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_ REM x 
1'OENTIF I CATION 
PRODUCT CODE: MAINDEC-11-DZ2DUS-B-D 
PRODUCT NAME: DUV11 OFFLINE RECEIVER TIMING TESTS 
RELEASE DATE: NOV. 1977 
MAINTAINER : DIAGNOSTICS 
x 
_ REM Ms 


COPYRIGHT (C) 1977 
DIGITAL EQUIPMENT CORPORATION, MAYNARD MASS. 


THE INFORMATION IN fHIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT NOTICE AND 
SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT CORPORATION. 
DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR ANY ERRORS 
THAT MAY APPEAR IN THIS DOCUMENT. 


THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED UNDER A LICENSE AND 
MAY ONLY BE USED OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE 


DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE USE OF 
RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL. 
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GENERAL DESCRIPTION 


THIS DIAGNOSTIC CAN CHAIN 16 DUV11'S. THIS MEANS THAT 

16 DEVICES CAN BE SEQUENTIALLY EXERCISED. THE DIAGNOSTIC 
MAKES ONE PASS BEFORE PROCEEDING TO THE NEXT DEVICE. 

AND CONTINUES EXERCISING ALL DEVICES IN THIS FASHION UNTIL 


HAL TED. 
x 
_ REM x 
1. THE DUV11 OFFLINE RECEIVER TIMING TESTS VERIFY THAT THE 
RECEIVER LOGIC AND ASSOCIATED ERROR FLAGS ASSERT 
AT THE PROPPER TIME 
x 
. REM x 


2. REQUIREMENTS 
PDP-11/03 COMPUTER (LS!) 
DUV11 SYNCRONOUS/ISOCRONOUS OPTION 
ONE CONSOLE TELETYPE OR EQUIVALENT 


2.2 STORAGE 
THE PROGRAM LOADS INTO 4K OF MEMORY WITH BOOTSTRAP 


3. LOADING PROCEDURE 


THE STANDARD PROCEDURE FOR LOADING ABSOLUTE BINARY TAPES 
1S TO BE USED 


STARTING ADDRESS 
FOR ABSOLUTE LOADER 


4K 017500 
8K 037500 
12K 057500 
16K 077500 
20K 117500 
24K 137500 
28K 157500 

4. STARTING PROCEDURE 

4.1 CONTROL SWITCH SETTINGS 


NOTE: ALL SWITCHES RESIDE INTERNAL TO THE CPU AT ADDRESS 
176. THESE MAY BE SET VIA THE CONSOLE TTY BY DIRECTLY 
MODIFYING LOC. 176. 


NOTE: RUNNING UNDER APT-11, THERE IS A USER SWITCH REGISTER 
CALLED “SUSWR". IN ORDER TO BE FLEXIBLE ON THE AVAILIBILITY OF THE 
H315 CONNECTOR, ONE BIT PASSES STATUS TO APT-11. 
BIT O IN SUSWR REFLECTS THIS STATUS. A O = CONNECTOR 
PRESENT. A 1 = CONNECTOR NOT AVAILIBLE. 
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THE USER CHANGES THE CONTENTS OF THIS LOCATION 
WHEN BUILDING THE E TABLE. BY ANSWERING THE 
PROMPT "SWITCH 2". 


AFTER PROGRAM LOAD (INITIAL PROGRAM START) 
ALL CONSOLE SWITCHES DOWN 


TO MODIFY DEVICE VECTOR AND CONTROL REGISTER ADDRESSES 
AFTER PROGRAM RESTART OR TO RUN MULTIPLE DEVICES 


SWOO=1 

TO START PROGRAM AT SELECTED TEST AFTER A PROGRAM RESTART 
_ (ONLY IN SINGLE DEVICE TESTS) 

WO1=1 


TO LOCK ON SELECTED TEST AFTER A PROGRAM RESTART 
(ONLY IN SINGLE DEVICE TESTS) 


SW14=1 

NOTE1: IN GENERAL SWO1 WILL BE USED WHEN SW1i4=1 IS USED 
NOTE2: WITHOUT SWO1=1 “LOCK ON TEST" WILL DEFAULT TO TEST 1 
STARTING ADDRESS 

THE STARTING ADDRESS FOR ALL TESTS 1S 000200 

THE RETARTING ADDRESS FOR ALL TESTS {1S 000200 

THE STARTING ADDRESS TO ENTER A SELECTED TEST 1S 000200 
THE STARTING ADDRESS TO LOCK ON TEST 1S 000200 

PROGRAM AND/OR OPERATOR ACTION 

INITIAL PROGRAM START 

4. 3.1.1 LOAD PROGRAM INTO MEMORY WITH ABSOLUTE LOADER 

4. 3.1.2 SET SWITCH REGISTER (LOC. 176) TO ZERO 

4.3.1.3 TYPE 2006. 


4. 3.1.4 PROGRAM WILL START. 


4. 3.1.5 THE PROGRAM WILL TYPE "“DUV11 DZDUS-B TAPE C” (ONCE ONLY) 
4 3.1.6 THE PROGRAM WILL TYPE “R" TO INDICATE THAT IT 1S ABOUT 
TO START TESTING . AND THEN TESTING WILL BEGIN 

PROGRAM RESTART WITH ALL SWITCHES DOWN 

4 3.2.1 THE PROGRAM WILL TYPE "R"” AND WILL COMMENCE TESTING 
PROGRAM RESTART WITH SWOO=1 


. REM 


_ REM 


SEQ 0003 
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4. 3.3.1 SET SWITCH REGISTER (LOC. 176) TO A 000001. 
4. 3.3.2 TYPE 2006. 
4. 3. 3. 3 PROGRAM WILL START. 

4 


4. 3.3.4 THE PROGRAM WILL TYPE “ 1ST DEVICE: RECEIVER CONTROL REGISTER 
ADDRESS" AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD 


4.3.3.5 TYPE IN THE ADDRESS OF THE FIRST RECEIVER CONTROL 
REGISTER ADDRESS OF THE DUVi1 TO BE TESTED 
FOLLOWED BY A <CARRIAGE RETURN> 


IF AN INCORRECT ADORESS IS TYPED . THE PROGRAM WILL TYPE “?" 
AND WILL THEN REPEAT THE MESSAGE OF 4.3.3.4 


4. 3.3.6 THE PROGRAM WILL TYPE “VECTOR ADDRESS-" AND WAIT FOR AN 
INPUT FROM THE TELETYPE KEYBOARD 


4.3.3.7 TYPE IN THE BASE RECEIVER INTERRUPT VECTOR ADDRESS 
FOR THE DUV11 TO BE TESTED FOLLOWED BY A <CARRIAGE RETURN> 
iF AN INCORRECT ADDRESS 1S TYPED . THE PROGRAM WILL TYPE "?" 
AND WILL THEN REPEAT THE MESSAGE OF 4. 3.3.6 


4. 3.3.8 THE PROGRAM WILL TYPE “ARE YOU RUNNING MULTIPLE DEVICES ?" 
(Y OR N)-" AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD 


4.3.3.9 TYPE IN THE APPROPRIATE ANSWER YES OR NO FOLLOWED BY A 
<CARRIAGE RETURN> 


IF AN INCORRECT ANSWER IS GIVEN, THE PROGRAM WILL TYPE “?" 
AND WILL THEN REPEAT THE MESSAGE OF 4.3.3.8 


1F A “NO” ANSWER 1S GIVEN: JUMP TO SECTION 4. 3.3.12 
IF A "YES" ANSWER IS GIVEN: THE NEXT QUESTION IS ASKED 


4. 3.3.10 THE PROGRAM WILL TYPE "LAST DEVICE: RECEIVER CONTROL 
REGISTER ADDRESS-" AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD 
4.3.3. 11 TYPE IN THE ADDRESS OF THE LAST RECEIVER CONTROL REGISTER 


ADDRESS OF THE DUV11 TO BE TESTED FOLLOWED BY A <CARRIAGE RETURN> 


IF AN INCORRECT ANSWER IS TYPED . THE PROGRAM WILL TYPE “: 
AND WILL THEN REPEAT THE MESSAGE OF 4. 3.3.10 
NOTE: ALL ADDRESSES SHALL BE CONTIGUOUS 


4.3.3.11.1 1F AN “OUT OF RANGE" ADDRESS 1S TYPED 
1E. MORE THAN 16 (10) DEVICES AWAY (UPWARDS)..... THE 
PROGRAM WILL TYPE “OUT OF RANGE: RETYPE LAST DEVICE RXCSR ADDRESS-" 
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AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD 
*.3.3.11.2 TYPE IN THE ADDRESS OF THE LAST RECEIVER CONTROL 


REGISTER ADORESS OF THE DUV11 TO BE TESTED FOLLOWED 
BY A <CARRIAGE RETURN> 


IF AN INCORRECT ANSWER IS TYPED . THE te ye WILL TYPE "“?" 
AND WILL REPEAT THE MESSAGE OF 4.3.3.1 


IF A DEVICE ADDRESS — THAN 1ST DEVICE ADDRESS IS TYPED........... 
. SCHOOLS OUT......... THERE |S NO PROTECTION FOR THIS. 

THE PROGRAM WILL DEFAULT TO TWO DEVICES ACTIVE (UPWARDS FROM 

1ST DEVICE ADDRESS). THE SAME APPLIES TO IDENTICAL ADDRESSES 

TYPED FOR FIRST AND LAST DEVICE. 

OBSERVE LOCATION @ ACTREG: SEE SECTION 7.2 


%. 3.3.12 THE PROGRAM WILL TYPE "# OF SYNC CHARS 
SELECTED (1 OR 2)-" AND WAIT FOR AN INPUT FROM THE TELETYPE 
KEYBOARD. REFER TO MANUAL FOR PROPER SWITCH SETTINGS OF 
SWITCH E55-4. 


a & SF TYPE IN THE APPROPRIATE ANSWER “1” OR "2" FOLLOWED 
BY A <CARRIAGE RETURN>. (NOTE: ALL MULTIPLE DEVICES MUST 
BE THE SAME) 


IF AN INCORRECT ANSWER IS TYPED . THE PROGRAM WILL TYPE "?" 
AND WILL REPEAT THE MESSAGE OF 4. 3.3.12 


4. 3.3. 14 THE PROGRAM WILL TYPE “ 1S SEC XMIT SWITCH E55-2 ON? (Y OR N)-" 
AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD 
4. 3.3.15 TYPE IN THE APPROPRIATE ANSWER YES OR NO FOLLOWED 


BY A <CARRIAGE RETURN>. (NOTE THAT ALL MULTIPLE DEVICES 
MUST BE THE SAME) 


IF AN INCORRECT ANSWER 1S TYPED . THE PROGRAM WILL TYPE “?" 
AND WILL REPEAT THE MESSAGE OF 4. 3. 3. 14 


4. 3. 3. 16 THE PROGRAM WILL TYPE "IS SEC REC SWITCH E55-3 ON? 
(Y OR N)-" AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD 
&. 2. 2 t7 TYPE IN THE APPROPRIATE ANSWER YES OR NO FOLLOWED 


BY A <CARRIAGE RETURN>. (NOTE: AcL MULTIPLE DEVICES MUST BE THE SANE) 
IF AN INCORRECT ANSWER IS TYPED . THE PROGRAM WILL TYPE “=” 
AND WILL REPEAT THE MESSAGE OF 4. 3.3.16 


4. 3.3.18 THE PROGRAM WILL TYPE "IS OPT CLR ENABLE SWITCH 
ES55-1 ON? (Y OR N)-" AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD 


4. 3.3.19 TYPE IN THE APPROPRIATE ANSWER YES OR NO FOLLOWED 
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BY A <CARRIAGE RETURN>. (NOTE: ALL MULTIPLE DEVICES MUST BE THE SAME) 


IF AN INCORRECT ANSWER IS TYPED , THE PROGRAM WILL TYPE “?” 
AND WILL REPEAT THE MESSAGE OF 4. 3.3.18 


4. 3. 3. 20 THE PROGRAM WILL TYPE “ARE YOU RUNNING IN MAINT. 
MODE EXTERNAL ? AND...... DO YOU HAVE THE EXTERNAL MODEM 
BYPASS JUMPER CONNECTOR ON ? (Y OR N)-" AND WAIT FOR AN 
INPUT FROM THE TELETYPE KEYBOARD 


4. 3.3. 21 TYPE IN THE APPROPRIATE ANSWER YES OR NO FOLLOWED BY 
A <CARRIAGE RETURN>. (NOTE: ALL MULTIPLE DEVICES MUST BE THE SAME) 


IF AN INCORRECT ANSWER IS TYPED . THE PROGRAM WILL TYPE "?" 
AND WILL REPEAT THE I SSAGE OF 4. 3. 3.20 


4. 3.3.22 THE PROGRAM WILL TYPE "R" TO INDICATE THAT IT 
HAS STARTED AND WILL COMMENCE TESTING AT TEST 1 


4.3.4 PROGRAM RESTART WITH SWO1=1 
NOTE: THIS WILL ONLY WORK WHEN A SINGLE DEVICE IS SELECTED 
,+-\1T WILL NOT WORK IF MULTIPLE DEVICES ARE SELECTED 


IF MULTIPLE DEVICES WERE PREVIOUSLY SELECTED.LOAD 000200. 
AND SELECT sWOO=1 AND ANSWER “NO” TO THE MULTIPLE DEVICE QUESTION 


SEE 4. 3.3 

4.3.4.1 SET SWO1=1 IN SWITCH REG (LOC. 176) 

4.3.4.2 TYPE 2006. 

4. 3.4. 3 PROGRAM WILL START. 

4. 3.4.4 THE PROGRAM WILL TYPE “TEST PC-" AND WAIT FOR AN INPUT FROM 


THE TELETYPE KEYBOARD 


4. 3.4.5 TYPE IN THE ADDRESS OF THE TEST AT WHICH THE PROGRAM IS TO 
BE STARTED FOLLOWED BY A <CARRIAGE RETURN> 


4. 3.4.6 THE PROGRAM WILL TYPE “R" TO INDICATE THAT IT HAS STARTED 
TESTING AT THE SELECTED TEST 


NOTE: CARE MUST BE TAKEN WHEN THIS FEATURE |S USED 
SINCE THERE 1S NO PROTECTION AGAINST SELECTING AN ADDRESS 
THAT 1S IN THE MIDDLE OF A TEST 
4.3.5 PROGRAM RESTART WITH SW14 =1 
NOTE: THIS WILL ONLY WORK WHEN A SINGLE DEVICE IS SELECTED 
SEE NOTE IN 4.3.4 FOR MORE DETAILS 
4.3.5.1 SET SWi4=1 IN SWITCH REG. (LOC. 176) 


4. 3.5.2 TYPE 2006. 
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4. 3.5. 3 PROGRAM WILL START. 


4.3.5.4 THE PROGRAM WILL TYPE “LOCK ON SELECTED TEST ? (Y OR N)-" 
AND WAIT FOR AN INPUT FROM THE TELETYPE KEYBOARD 


4.3.5.5 TYPE IN THE APPROPRIATE ANSWER YES OR NO FOLLOWED BY A 
-<CARRIAGE RETURN> 


1F A NO ANSWER IS GIVEN: THiS LOCK ON TEST WILL BE IGNORED 


AND THE PROGRAM WILL TYPE "R" TO INDICATE THAT IT HAS STARTED 


TESTING AT TEST 1 


4.3.5.6 IF A YES ANSWER WAS GIVEN: THE PROGRAM WILL ACT AS FOLLOUWS. .. 


THE PROGRAM WILL TYPE "R" TO INDICATE THAT IT HAS STARTED 
TESTING AT TEST 1 AND WILL REMAIN IN TEST 1 UNTIL HALTED 
OR IF ANY KEY IS STRUCK ON THE TELETYPE . THE PROGRAM 
WILL FREEZE ON THE NEXT TEST UNTIL A KEY IS STRUCK ON 

THE TELETYPE AND SO FORTH THRU THE PROGRAM. IF SWO1 =1 IT 
WILL PERFORM AS IN SECTION 4.3.4 ALLOWING ONE TO FREEZE 
ON A SELECTED TEST RATHER THAN DEFAULTING TO TEST 1 


OPERATING PROCEDURE 


OPERATIONAL SWITCH rime TO THE CPU, ACCESSED VIA LOC 


SW15 =1 HALT ON E 


SW14 = LOOP ON CURRENT TEST 

SW13 =1 INHIBIT ERROR TYPEOUT 

SW11 =1 INHIBIT ITERATIONS 

SW10 =1 ESCAPE TO NEXT TEST ON ERROR 

SWO9 =1 LOOP ON ERROR 

SWO1 =1 RESTART PROGRAM AT SELECTED TEST 

SHOO =1 RESELECT VECTOR AND CONTROL REGISTER ADRESSES 


&PARAMETERS AFTER A PROGRAM RESTART 
TO INHIBIT “END OF PASS" TYPEOUT - TURN TELETYPE OFF 


ERRORS 


ERROR HALTS (UNDER LS! ALL HALT ERRORS RETURN CONTROL TO 0.0.T.) 
THERE ARE FOUR DISTINCT ERROR TYPEOUTS 


PC+2 = ERROR PC 
WHERE PC +2 1S THE ADDRESS OF THE CALL TO THE ERROR HANDLER +2 


REFER TO THE ABOVE "HLT" IN DIAGNOSTIC FOR ERROR DESCRIPTION 


CHECK ADDRESS @ RXCSR: TO LOCATE THE DEVICE PRESENTLY UNDER 
TEST WHEN RUNNING MULTIPLE DEVICES 


PC +2 = REGISTER ERROR PC 

REGISTER EXPECTED ACTUAL 

16XXXX YYYYYY 222222 

WHERE 16XXXX IS THE ADDRESS OF THE FAILING DEVICE REGISTER 


WHERE YYYYYY IS THE EXPECTED CONTENTS OF THAT REGISTER 


176). 


SEQ 0007 
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WHERE 222222 1S THE ACTUAL CONTENTS OF THAT REGISTER 


PC +2 = RECEIVER ERROR PC 
REGISTER EXPECTED ACTUAL 
16XXXX YYYYYY 222222 ° 


WHERE 16XXXX 1S THE ADDRESS OF THE FAILING RECEIVER (RXDBUF) REGISTER 
WHERE YYYYYY IS THE EXPECTED DATA CONTENTS OF THAT REGISTER 
WHERE 222222 1S THE ACTUAL DATA CONTENTS OF THAT REGISTER 


PC +2 = TRANSMITTER ERROR PC 
REGISTER EXPECTED ACTUAL 
16XXXX YYYYYY 222222 


WHERE 16XXXX IS THE ADDRESS OF THE FAILING TRANSMITTER (TXCSR) REGISTER 
WHERE YYYYYY #S THE EXPECTED CONTENTS OF THAT REGISTER 
WHERE 222222 1S THE ACTUAL CONTENTS OF THAT REGISTER 


ERROR DESCRIPTIONS 
SEE LISTINGS FOR DETAILS OF ERRORS 


ERROR RECOVLRY 


SW15 =0 
IF THE PROGRAM IS RUN WITH SW15 =0 .NO OPERATOR ACTION IS 
REQUIRED TO CONTINUE TESTING 


SW15 = 

IF THE PROGRAM IS RUN WITH SW15 =1 .TO CONTINUE TESTING 
AFTER THE PROGRAM HAS HALTED .PRESS THE PROCESSOR 
CONSOLE “CONTINUE SWITCH" 


NOTE: THE PC + 2 OF THE “HLT” WILL BE DISPLAYED IN THE DATA LIGHTS 


ILLEGAL INTERRUPTS 

IF AN INTERRUPT OCCURS TO A VECTOR ADDRESS NOT SELECTED 
DURING PROGRAM INITIALIZATION, THE PROGRAM WILL HALT IN 
THE TRAPCATCHER. THE ADDRESS AT WHICH THE PROGRAN 

HALTS 1S 2 GREATER THAN THE ADDRESS TO WHICH THE INTERRUPT 
OCCURED. THE PROGRAM MUST BE RESTARTED AT 000200 TO 
RECOVER FROM THIS ERROR. 


ADDITIONAL TROUBLESHOOTING AIDS ERRCNT: & PASCNT: 
CHECK THESE TWO TAG LOCATIONS FOR TOTAL # OF ERRORS AND PASSES PESPECTIVELY 
LOADING 000200 AND RESTARTING WILL CLEAR THESE LOCATIONS. on 


@, 


END OF PASS ROUTINE 
THIS TYPEQUT 1S MENTIONED HERE FOR CONVENIENCE 
iT iS IN THE FORM: 


SEQ 0008 
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END OF PASS TAPE Y 
16XXXX = DEVICE 


WHERE Y IS THE TAPE LOADED 

WHERE 16XXXX IS THE DEVICE'S BASE REGISTER ADDRESS 
TC INHIBIT THIS TYPEOUT - TURN TELETYPE OFF 
RESTRICTIONS 


MULTIPLE DEVICES 
UP TO 16(10) DEVICES MAY BE TESTED. HOWEVER, THEY 
MUST HAVE CONTIGUOUS ADDRESSES AND VECTORS 


NOTE: IF ALL DEVICES UNDER TEST HAVE THE SAME INTERRUPT VECTOR 
YOU CAN CHANGE "ZERO: ADD #10,BASEIV ;NEXT BLOCK 
(VECTORS)" TO “ZERO: ADD #0, BASE IV", 

THEREBY THE VECTOR ADDRESSES WILL NOT BE 

UPDATED AFTER EACH PASS. 


DISQUALIFYING DEVICES WHEN RUNNING MULTIPLE DEVICES 


WHEN RUNNING MULTIPLE DEVICES AN ACTIVE BIT IS SET 
FOR EACH DEVICE RUNNING UNDER TEST IE. BIT O FOR 
DEVICE O .BIT 15 FOR DEVICE 15 

TO DISQUAL Ir Y DEVICES: 


IF DEVICE O IS TO BE DISQUALIFIED .SIMPLY RESTART 
PROGRAM WITH SWOO =1 AND OMIT THE FIRST DEVICE. 


IF HOWEVER, DEVICES 1 THRU 15 OR ANY COMBINATION THEREOF 
ARE TO BE DISQUALIFIED.... LOAD THE LOCATION OF ACTREG: 
OBSERVE THE ACTIVE BITS (ACTIVE =1, NONACTIVE = 0) 

AND DEPOSIT O WHERE THOSE DEVICES ARE TO BE DISQUALIFIED 


7.2.2.1 TO RESTART... TYPE 2006. . 
THE PROGRAM WILL CONTINUE WITH THE DEVICE IT WAS IN BEFORE HALTING. 


A 8 eee Oe savas SET SWOO=1 IN SWITCH REG (LOC. 176) AND TYPE 200G .. 
ANSWER THE QUESTION : 1ST DEVICE : ETC........... 
THE PROGRAM WILL CONTINUE WITH DEVICE 0 


7.2.2.3 IF ALL DEVICES ARE DISQUALIFIED BY MISTAKE THE PROGRAM 
WILL TYPEOUT AN ERROR MESSAGE....... TYPE 200G. 


CABLE DELAYS 
NOTE: EXTERNAL LOOP BACK TESTS ONLY (MODEM CABLE WITH H315 CONNECTOR ON) 


TO PROVIDE SUFFICIENT DELAY FOR CLOCK SIGNAL OVER THE CABLE. 

LOCATION “HOLD: “ MUST BE MODIFIED TO ACCOMODATE FOR FASTER MACHINES 
PRESENTLY "HOLD: " =20 IS SUFFICIENT TIME ON AN 11703 MACHINE. 

BASICALLY DON'T TRY TO EXCEED 10K TO 12K RATE USING THE EIA DRIVERS 


TO USE THE "XOR" TESTER . THE BRANCH AROUND THE "XOR" 


SEQ 0009 
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CODE MUST BE PATCHED TO A "NOP". (SEE LISTINGS FOR DETAILS) 


DEFAULT PARAMETERS: 
1ST DEVICE: RECEIVER CONTROL REGISTER ADDRESS- RXCSR: 160010 


VECTOR ADDRESS- DURIV: 770 
ARE YOU RUNNING MULTIPLE DEVICES ?- NO MULTD: 0 
LAST DEVICE: RECEIVER CONTROL REGISTER ADDRESS- LASTADD: 0 
# OF SYNC CHARS SELECTED - 2 SYNCNO: 377 

1S SEC KMIT SWITCH E55-2 ON?- YES SEXMIT: 377 

1S SEC REC SWITCH ESS-3 ON?- YES SEREC: 377 


1S OPT CLR ENABLE SWITCH E55-1 ON?- YES OPTCLR: 377 


DO YOU HAVE THE EXTERNAL MODEM BYPASS JUMPER 
CONNECTOR ON (H315)- YES JMRBY: 377 


PROGRAM DESCRIPTION 


x 
. REM 
THIS PROGRAM PERFOFMS THE OFFLINE RECEIVER TIMING TESTING 
OF THE DEVICE 
SEE LISTING FOR DETAILS . 
_ REM 


FLOW CHARTS: RECE'VER FLOW. TRANSMITTER FLOW, TRANSMITTER & RECEIVER FLOW 
LISTINGS 


SEQ 0010 
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536 o00c001 STN=1 


Mn 1 
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558 . ENABLE ABS 
559 
560 +DUV11 DZDUS-B TAPE C 
+4! ;COPYRIGHT 1977, DIGITAL EQUIPMENT CORP.. MAYNARD. MASS. 01754 
563 +STARTING PROCEDURE 
564 + TYPE 200G 
565 +PROGRAM WILL TYPE “DUV11 DZDUS-B TAPE C “ 
566 ;PROGRAM WILL TYPE "R" TO INDICATE THAT TESTING HAS STARTED 
567 ;AT THE END OF A PASS, PROGRAM WILL TYPE "ENO OF PASS TAPE C” 
a2 AND THEN RESUME TESTING 
chy .SBTTL BASIC DEFINITIONS 
572 ;XINITIAL ADDRESS OF THE STACK POINTER &4% 1100 44% 
573 001106 STACK= 1100 
574 . EQUIV EMT, ERROR +;BASIC DEFINITION OF ERROR CALL 
th . EQUIV. 10T, SCOPE +;BASIC DEFINITION OF SCOPE CALL 
577 + ¥MISCELLANEOUS DEFINITIONS 
578 000011 HT= 11 +>CODE FOR HORIZONTAL TAB 
579 900012 LF= 12 +;CODE FOR LINE FEED 
580 000015 CR= 15 +;CODE FOR CARRIAGE RETURN 
581 0009200 CRLF= 200 ++CODE FOR CARRIAGE RETURN-LINE FEED - 
582 177776 PS= 177776 ++ PROCESSOR STATUS WORD 
583 . EQUIV PS, PSH 
584 177774 STKLMT= 177774 +;+STACK LIMIT REGISTER 
585 177772 PIRQ= 177772 +; PROGRAM INTERRUPT REQUEST REGISTER 
586 177570 DSWR= 177570 ;; HARDWARE SWITCH REGISTER 
of 177570 ODISP= 177570 +; HARDWARE DISPLAY REGISTER 
589 ; XGENERAL PURPOSE REGISTER DEFINITIONS 
590 oco000 RO= %0 GENERAL REGISTER 
591 000001 Ri= %1 ;;GENERAL REGISTER 
592 000002 R2= %2 +> GENERAL REGISTER 
593 000003 R3= %3 +,GENERAL REGISTER 
594 000004 R4= %4 +;GENERAL REGISTER 
595 000005 RS= %5 >;GENERAL REGISTER 
596 000006 R6= %6 ++GENERAL REGISTER 
597 000007 R7= %7 ;;GENERAL REGISTER 
598 000006 SP= %6 +; STACK POINTER 
000007 PC= - %7 +;PROGRAM COUNTER 
6 
601 ;¥PRIORITY LEVEL DEFINITIONS 
602 000000 PRO= 0 7-PRIORITY LEVEL 0 
603 000040 PRi= 40 +-PRIORITY LEVEL 1 
604 000100 PR2= 100 s-PRIORITY LEVEL 2 
605 000140 PR3= 140 +;PRIORITY LEVEL 3 
606 000200 PRU= 200 ;;PRIORITY LEVEL 4 
607 000240 PRS= 240 s-PRIORITY LEVEL 5 
608 000300 PR6= 300 +-PRIORITY LEVEL 6 
609 000340 PR7= 340 7 PRIORITY LEVEL 7 
610 
611 ;K"SWITCH REGISTER” SWI1CH DEFINITIONS 
612 100000 SW15= 100000 


613 040000 SWi4= 40000 


eee 
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020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
00c002 
000001 


100000 
040000 
020000 
016000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
oco0d4 
000002 
000001 


000004 
000010 
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BASIC DEFINITIONS 


. EQUIV 
. EQUIV 
. EQUIV 
. EQUIV 


+ XDATA 


EQUIV 


+ XBASIC 
ERRVEC= 
RESVEC= 


SWOO, SWO 


BIT es (BITOO TO BIT15) 


BDowwowwwwe-ns 


BI TOO, BITO 
"CPU" TRAP VECTOR ADDRESSES 


4 >, TIME OUT AND OTHER ERRORS 
10 ++RESERVED AND ILLEGAL INSTRUCTIONS 


SEQ 0013 









DZ2DUSB. M11 












DZDUS-B MACY11 30(104%6) 
31-MAY-77 09:49 


000014 
000014 
000014 
000020 
000024 
000030 
000034 
000060 
000064 
000240 
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BASIC DEFINITIONS 


TBITVEC=14 
TRIVEC= 14 
BPTVEC= 14 
1\OTVEC= 20 
PWRVEC= 24 
EMNTVEC= 30 
TRAPVEC=34 
TKVEC= 60 
TPVEC= 64 


PIRQVEC=240 








SEQ 0014 


e"T" BIT 

++ TRACE TRAP 

++BREAKPOINT TRAP (BPT) 

++ INPUT/OUTPUT TRAP (10T) X¥SCOPEX* 
++POWER FAIL 

++EMULATOR TRAP (EMT) XXERROR*X 

++ "TRAP" TRAP 

++ TTY KEYBOARD VECTOR 

+; TTY PRINTER VECTOR 

+; PROGRAM INTERRUPT REQUEST VECTOR 
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ar STANDARD INTERRUPT VECTORS 
682 
683 000174 2174 
684 000174 000000 DISPREG: 0 
685 000176 000000 SWREG: 0 
686 000200 . =200 
rr oh 000200 000167 001746 JMP . START GO TO START OF PROGRAM 
689 
690 
691 001100 . =1100 
692 001100 o0c000 . WORD O 
oe 001102 177570 LIGHTS: 177570 
695 
696 
th ;PROGRAM CONTROL PARAMETERS 
699 9001104 000000 RETURN: 0 
700 001106 cdd000 NEXT: 0 ;ADDRESS OF NEXT TEST TO BE EXECUTED 
701 001110 000000 LOCK: 0 ;ADDRESS FOR LOCK ON CURRENT DATA 
702 001112 000000 PASCNT: 0 ;ADORESS CONTAINING PASS COUNT 
703 001114 9000000 ERRCNT: 0 ERROR COUNT 
ad 001116 000000 SAVSP: 90 STACK POINTER STORAGE 
he PROGRAM VARIABLES 
70 ‘ 
708 001120 000020 HOLD: 20 ; TEMPORARY STORAGE=DELAY TIME FOR CABLES ~~ 
709 001122 9000000 SHIFT: QO ; TEMPORARY STORAGE= # OF SHIFTS PER CHAR 
710 001124 000000 COUNT: 0 ; TEMPORARY STORAGE= # OF TIMES A CHAR WILL BE SENT 
711 001126 000000 SAVPC: 0 PROGRAM COUNTER STORAGE 
712 001130 000000 HLOO: 0 
713 001132 000000 HLD1: 0 
714 001134 000000 HLD2: 0 
716 001136 900000 HLD3: 0 
716 001140 000000 HLD4: 0 
717 001142 000000 HLDS5: 0 
718 001144 000000 HL D6: 0 
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DZDUSB. M11 31-MAY-77 09:49 SEQ 0016 
720 ; PROGRAM peacoat he PARAMETERS 
721 001146 377 SYNCNO: .BYTE 377 # OF SYNC CHARS REQ’ ‘0 FOR SYNC ‘ZATION 
722 001147 377 SEXMIT: .BYTE 377 ; SEC XMIT JUMPER “IN 
723 001150 377 SEREC BYTE 377 ;SEC REC JUMPER "IN" 
724 001151 377 OPTCLR: .BYTE 377 ; OPTIONAL JUMPER CLR "IN" 
725 001152 oco MULTOD: .BYTE OQ +NO MULTIPLE DEVICE FLAG 
726 001153 377 JMRBY: . BYTE 377 ; EXTERNAL MODEM BYPASS JUMPER “IN” 
727 . EVEN 
728 
729 ;PROGRAM MULTIPLE DEVICE PARAMETERS 
730 001154 900000 BASEADD: 0 ;PROG CONTROLLED 1ST DEVICE ADDR 
731 001156 000000 KEEPADD 0 ; SAVED 1ST DEVICE ADDR 
732 001160 o00C000 LASTADD 0 +LAST DEVICE RXCSR ADDR 
733 001162 000000 BASE IV 0 ;PROG CONTROLLED IV 
734 001164 0900000 KEEP IV: 0 ;SAVED INTR VECTOR 
735 001166 000000 ACTREG: 0 ;ACTIVE REGISTER ..,-MODIFY THIS 
736 ;LOCATION TO DISQUALIFY OR QUALIFY 
738 001170 O00000 ROTADD: 0 ;ROTATING POINTER FOR ACTREG. . POINTS 
739 ;TO DEVICE PRESENTLY UNDER TEST WHEN RUNNING MULTIPLE DEVICES 
740 
741 ;PROGRAM CONTROL FLAGS 
742 
743 001172 000 INIFLG: . BYTE 0 ;PROGRAM INITIALIZATION FLAG 
744 001173 000 STFLG: . BYTE 0 > TEST START FLAG 
745 001174 000 LOKFLG: . BYTE 0 >;LOCK ON CURRENT TEST FLAG 
746 001176 EVEN 
747 001400 =1400 
748 
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005746 
005726 
010046 
012600 
O24646 
022626 


100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 


100000 
040000 
020000 
010000 


001000 
000400 


030000 
020000 
000000 
000000 
002090 
004000 
006000 
000000 
001000 
001400 


100000 
040000 
020000 
002000 
000400 
000200 
000100 
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BASIC DEFINITIONS 


+ INSTRUCTION DEFINITIONS 


PUSH1SP=5746 +DECREMENT PROCESSOR STACK 1 WORD =TST -(SP) 
POP 1SP=5726 + INCREMENT PROCESSOR STACK 1 WORD =TST (SP)+ 
PUSHRO= 10046 +SAVE RO ON STACK =MOV RO, -(SP) 
POPRO=12600 +RESTORE RO FROM STACK =MOV (SP)+,RO 
PUSHZ2SP=24646 ;DECREMENT STACK TWICE =CMP -(SP),-(SP) 
POP 2SP=22626 ; INCREMENT STACK TWICE =CMP (SP)+, (SP)+ 
REGISTER DEFINITIONS 

+RXCSR BIT DEFINITIONS 


DSC=BIT1I5 ;DATA SET CHANGE 
RING=B1T14 +RING 
CTS=BIT13 rat R TO SEND 
CARDET=B1T12 CARRIER DETECT 
RECACT=B1T11 7REC ACTIVE 
SRD=B1T10 SEC REC DATA 
DSR=B1T9 *>DATA SET RDY 
STPSYN=B1T8 +STRIP SYNC 
RXDONE=B1T?7 REC DONE 
RINTEN=B1T6 REC INTR ENABLE 
DSINTE=B1TS OSC INTR ENABLE 
SYNSCH=B | T4 SYNC SEARCH 
STO=BIT3 +SEC XMIT DATA 
RTS=B1T2 +REQ TO SEND 
OTR=BIT1 ;DATA TERM RDY 
VO1D=B1TO 

;RXDOBUF BIT DEFINITIONS 
RXERR=B1T15 7REC ERROR 
OVRRUN=B1T14 + OVERRUN 
FRMERR=BIT13 FRAME ERROR 
PARER=B1T12 ;PARITY ERROR 

;PARCSR BIT DEFINITIONS 
PAREN=B1T9 PARITY ENABLE 
EVPAR=BI1T8 > EVEN PARITY SENSE 

;PARCSR WROD DEFINITIONS 
SYNINT=30000 SYNC EXTERNAL MODE 
SYNEXT=20000 SYNC INTERNAL MODE 
1SYMOD=0 + 1SOC MODE 
FIVE=0 ;WORD LENGTH 5 BITS 
$1X=2000 +WORD LENGTH 6 BITS 
SEVEN=4000 +WORD LENGTH 7 BITS 
E 1GHT=6000 +WORD LENGTH 8 BITS 
NOPAR=0 +NO PARITY 
ODDPAR=1000 ODD PARITY 
EVEPAR=1400 + EVEN PARITY 

+ TXCSR BIT DEFINITIONS 
DNA=B1T15 ;DATA NOT AVAILABLE 
MTDATA=B1T14 MAINT DATA 
CLK=BIT13 + CLK 
BITW=BITIO *BIT WINDOW 
MRESET=B1T8 ;MASTER RESET 
TXDONE =B | T7 +XMIT DONE 
TXINTE=B1T6 >XMIT INTR ENABLE 


SEQ 0017 
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DZOUSB. M11 31-MAY-77 
806 000040 
807 000020 
808 000010 
809 000001 
810 
811 000000 
812 004000 
813 010000 


814 014000 


2 


09 


1-SEP-77 09:1 
:49 


2 PAGE 20 
BASIC DEFINITIONS 


DNAINTE=B1TS DONA _INTR ENAB 
SEND=B1T4 + SEND 
HOXEN=BIT3 + HDX/F DX 
BREAK=B1TO + BREAK 

dione 4 WRO DEFINITIONS 
USER=0 USER MODE 
MINT=4000 ;MAINT INT MODE 
MEXT=10000 ;MAINT EXT MODE 


SYSTST=14000 + SYSTEM TEST MODE 


SEQ 0018 
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DZ0USB. M11 


001400 
001400 
001402 
001403 
001404 
001406 


001460 


001462 
001464 
001466 
001470 
001472 
001474 
001476 
001500 
001502 
001504 
001506 
001510 
001512 
001514 
001516 
001522 
001523 


001400 
000000 


0 
000000 
000000 
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000377 


COMMON TAGS 
.SBTTL COMMON TAGS 
jj MAXXKAAAAAAAAA AAA AAA AAA AAA AAA AAA AA AAA AAA AA AAA AA AA AAA AAA AAAS 


+XTHIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATICNS 
;+XUSED IN THE PROGRAN. 


SCMTAG: wen 6 ++ START OF COMMON TAGS 
STSTNM: .BYTE 0 ++CONTAINS THE TEST NUMBER 
SERFLG: .BYTE 0 ++ CONTAINS ERROR FLAG 
$1CNT: WORD 0 +; CONTAINS SUBTEST ITERATION COUNT 
SLPADR: .WORD O +; CONTAINS SCOPE LOOP ADDRESS 
SLPERR: .WORD 0 +; CONTAINS SCOPE RETURN FOR ERRORS 
SERTTL: .WORD 0 ++ CONTAINS TOTAL ERRORS DETECTED 
SITEMB: .BYTE O ++CONTAINS ITEM CONTROL BYTE 
SERMAX: .BYTE 1 +; CONTAINS MAX. ERRORS PER TEST 
SERRPC: .WORD OQ ++CONTAINS PC OF LAST ERROR INSTRUCTION 
SGDADR: .WORD 0 +; CONTAINS ADDRESS OF ‘GOOD’ DATA 
SBDADR: .WORD OQ +;CONTAINS ADDRESS OF ‘BAD' DATA 
SGDDAT: .WORD 0 +;CONTAINS ‘GOOD’ DATA 
SBDDAT: .WORD OQ ++CONTAINS ‘BAD’ DATA 

WORD 0 ++ RESERVED--NOT TO BE USED 

.WORD O 
SAUTOB: .BYTE OQ ;;AUTOMATIC MODE INDICATOR 
SINTAG: gah | : ++ INTERRUPT MODE INDICATOR 

W 


-WORD ODSWR ;;AODRESS OF SWITCH REGISTER 
;; ADDRESS OF DISPLAY REGISTER 


STKS: 177560 + TTY KBO STATUS 
STKB: 177562 +; TTY KBD BUFFER 
STPS: 177564 +; TTY PRINTER STATUS REG. ADDRESS 
STPB: 177566 +; TTY PRINTER BUFFER REG. ADDRESS 
SNULL: BYTE 0 +; CONTAINS NULL CHARACTER FOR FILLS 
SFILLS: .BYTE 2 ++ CONTAINS # OF FILLER CHARACTERS REQUIRED 
SFILLC: .BYTE 12 ; INSERT FILL CHARS. AFTER A “LINE FEED" 
STPFLG: .BYTE OQ :; "TERMINAL AVAILABLE" FLAG (BIT<G7>=0=YES) 
SREGAD: .WORD OQ +; CONTAINS THE ADDRESS FROM 
*+;WHICH (SREGO) WAS OBTAINED 
SREGO: .WORD 0 +; CONTAINS ((S$REGAD)+0) 
SREGi: .WORD O +;CONTAINS ((SREGAD)+2) 
SREG2: .WORD OQ +;CONTAINS ((SREGAD)+4) 
SREG3: . WORD O +; CONTAINS ((SREGAD) +6) 
SREGY: .WORD O +;CONTAINS ((SREGAD)+10) 
SREGS: .WORD 0 +;CONTAINS ((SREGAD) +12) 
STMPO: .WORD O ;;USER DEFINED 
STMP1: .WORD O +;USER DEF INED 
STMP2: .WORD 0 +;USER DEFINED 
STMP3: .WORD OQ +;USER DEFINED 
STMPY: .WORD O ++USER DEFINED 
STMPS: .WORD 0 +;USER DEFINED 
STIMES: O 7+ MAX. NUMBER OF ITERATIONS 
SESCAPE: 0 ; ESCAPE ON ERROR ADORESS 
S$BELL: .ASCIZ + ile maid ; 3; CODE FOR BELL 
SQUES: .ASCII 777 ;; QUESTION MARK 
SCRLF: .ASCII <15> +; CARRIAGE RETURN 


SEQ 0019 
t 
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001524 


001526 
001526 
001530 
001532 
001534 
001536 
001540 
001542 
001544 
001546 
001546 
001547 
001550 
001552 
001554 


001556 
001557 


001560 


001562 
001563 
001564 
001566 


001624 


000012 


000000 
000000 
000000 
000000 
000000 
oo0co00 
000000 
000000 


C00000 


000 
000 


000000 


000000 
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COMMON TAGS 


SLF: .ASCIZ <12> ++LINE FEED 
jp RAEXAAAAAAAAAAAAAAA AAA AA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AA AAS 
.SBTTL APT MAILBOX-ETABLE 


i =" Rerte cme nmmnanpe nena p ga ame tet amici nen rE 
EV 


SMAIL: ;;APT MAILBOX 
SMSGTY: .WORD AMSGTY ;; MESSAGE TYPE CODE 
SFATAL: .WORD FATAL ;; FATAL ERROR NUMBER 
STESTN: .WORD ATESTN ;; TEST NUMBER 
SPASS: .WORD APASS ;;PASS COUNT 
SDEVCT: .WORD ADEVCT ;; DEVICE COUNT 
SUNIT: .WORD AUNIT ;: 170 UNIT NUMBER 
SMSGAD: . WORD AMSGAD ;; MESSAGE ADDRESS 
SMSGLG: .WORD AMSGLG ;; MESSAGE LENGTH 
SE TABLE: +;APT ENVIRONMENT TABLE 
SENV: . BYTE AENV >; ENVIRONMENT BYTE 
SENVM: . BYTE AENVM ;; ENVIRONMENT MODE BITS 
SSWREG: .WORD ASWREG ;; APT SWITCH REGISTER 
SUSWR: .WORD AUSWR ;;USER SWITCHES 
SCPUOP: .WORD ACPUOP ;; CPU TYPE.OPTIONS 
2 BITS 15-11=CPU TYPE 
;k 11/04=01, 11/05=02, 11/20=03. 11740=04, 11745=05 
x 11/70=06, PDQ=07, Q=10 
x BIT 10=REAL TIME CLOCK 
;x BIT 9=FLOATING POINT PROCESSOR 
;x BIT S8=MEMORY MANAGEMENT 
SMAMS1: . BYTE AMAMS1 -;;HIGH ADDRESS.M.S. BYTE 
$M 
x 
x 
x 


we Me 


TYP1: .BYTE AMTYP1 ;; MEM. TYPE, BLK&1 

MEM. TYPE BYTE -- (HIGH BYTE) 

900 NSEC CORE=001 
300 NSEC BIPOLAR=002 

+k 500 NSEC MOS=003 
SMADR1: . WORD AMADR1 ;;HIGH ADDRESS. BLK#1 
;x MEM. LAST ADDR. =3 BYTES. THIS WORD AND LOW OF "TYPE" ABOVE 
SMANS2: .BYTE AMAMSZ2 ;; HIGH ADDRESS.M.S. BYTE 
SMTYP2: .BYTE AMTYP2 ;; MEM. TYPE, BLK#2 
SMADR2: . WORD AMADR2Z ;.MEM. LAST ADDRESS, BLK&2 
SMAMS3: .BYTE AMANS3 ;; HIGH ADDRESS.M. S. BYTE 
SMTYP3: .BYTE AMTYPS ;; MEM. TYPE. BLK&3 
SMADR3: .WORD AMADR3 ;; MEM. LAST ADDRESS, BLK&3 
SMANSY: .BYTE AMAMSY ;; HIGH ADDRESS.M. S. BYTE 
SMTYP4: .BYTE AMTYPY ;; MEM. TYPE. BLK&4 
SMADRY: . WORD AMADRY ;; MEM. LAST ADDRESS, BLK&4 
SVECT1: . WORD AVECTI ;; INTERRUPT VECTOR#1,BUS PRIORITY#1 
SVECT2: .WORD AVECT2 ;; INTERRUPT VECTOR#2RUS PRIORITY&2 
SBASE: .WORD ABASE ;; BASE ADDRESS OF EQUIPMENT UNDER TEST 
SODEVM: .WORD ADEVN ;; DEVICE MAP 
$COW1: .WORD ACOW1 ;; CONTROLLER DESCRIPTION WORD#1 
S$COW2: .WORD ACOW2 ;; CONTROLLER DESCRIPTION WORD#2 
SODWO: .WORD ADDWO ;; DEVICE DESCRIPTOR Deo 
S$D0W1: .WORD ADOW1 ;; DEVICE DESCRIPTOR WORDS! 
$00W2: . WORD ADOW2 ;; DEVICE DESCRIPTOR WORD&2 
S$DDW3: . WORD ADDW3 ;; DEVICE DESCRIPTOR WORD#3 
SDDW4: .WORD ADDWY ;; DEVICE DESCRIPTOR WORD#4 
SDDWS: .WORD ADOWS ;; DEVICE DESCRIPTOR WORDSS 


= 
So 
za 


SEQ 0020 


DZDUS-B MACY11 30(10%6) 21-SEP-77 09:12 PAGE 23 


DZ20USB. M11 31-MAY-77 09: 49 APT MAILBOX-ETABLE SEQ 0021 
927 001626 000000 $O0W6: . WORD ADDWE ;; DEVICE DESCRIPTOR WORD#6 
928 001630 000000 $DDW7: .WORD ADOW? ;; DEVICE DESCRIPTOR WORD#7 
929 001632 000000 $D0W8: .WORD ADDWS ;; DEVICE DESCRIPTOR WORDSS 
930 001634 000000 SDOW9: . WORD ADDW9 ;; DEVICE DESCRIPTOR WORDS9 
931 001636 000000 $DDW10: .WORD ADDW10 ;; DEVICE DESCRIPTOR WORD#10 
932 001640 000000 SODW11: .WORD ADOW11 +; DEVICE DESCRIPTOR WORD#11 
933 001642 000000 $DDW12: . WORD ADOWIZ ;; DEVICE DESCRIPTOR WORD#12 
934 001644 000000 $D0W13: . WORD ADDW13 ;; DEVICE DESCRIPTOR WORD#13 
935 001646 000009 SDDW14: .WORD ADDWI4 ;; DEVICE DESCRIPTOR WORD#14 
43 001650 9o00000 S$DDW15: .WORD ADOWIS ;; DEVICE DESCRIPTOR WORD#15 
938 
939 001652 SETEND 
940 
941 
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943 

944 

945 

946 

947 

948 005746 
949 005726 
950 010046 
951 012600 
952 024646 
953 022626 
954 

955 

956 100000 
957 040000 
958 020000 
959 010000 
960 004000 
961 002000 
962 001000 
963 000400 
964 000200 
965 000100 
966 000040 
967 000020 
968 000010 
969 000004 
970 000002 
971 000001 
972 

973 100000 
974 040000 
975 020000 
976 010000 
977 

978 001000 
979 000400 
980 

981 030000 
982 020000 
983 000000 
984 000000 
985 002090 
986 004000 
987 006000 
988 000000 
989 001000 
990 001400 
991 

992 100000 
993 040000 
994 020000 
995 002000 
996 000400 
997 000200 


998 000100 
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APT MAILBOX-ETABLE 


+ INSTRUCTION DEFINITIONS 


PUSH1SP=5746 
POP 1SP=5726 
PUSHRO=10046 
POPRO=12600 
PUSH2SP=24646 ;DECRENE 
POP 2SP=22626 + INCREME 
*REGISTER DEFINITIONS 
+RXCSR BIT DEF IN 
DSC=BIT15 
RING=B1T14 
CTS=BIT13 
CARDET=BIT12 
RECACT=BIT11 
SRO=81T10 
DSR=B1T9 
STPSYN=B1T8 
RXDONE=B1T7 
RINTEN=B1T6 
DSINTE=B1TS 
SYNSCH=B 1 T4 
STD=BIT3 
RTS=BIT2 
DTR=BIT1 
VO1D=B1TO 
+RXDBUF BIT DEF! 
RXERR=B1T15 
OVRRUN=B1T14 
FRMERR=B1IT13 
PARER=B1T12 
;PARCSR BIT DEFI 
PAREN=BIT9 
EVPAR=BIT8 
+PARCSR WROD DEF I 
SYNINT=30000 
SYNEXT=20000 
1SYMOD=0 
FIVE=0 
$1X=2000 
SEVEN=4000 
E 1GHT=6000 
NOPAR=0 
ODDPAR= 1000 
EVEPAR=1400 


; INCREME 
+ SAVE RO 
+ RESTORE 


DNA=B1T15 
MTDATA=B1T14 
CLK=BIT13 

BITW=B1T10 

MRESET=B1T8 
TXDONE =B1T7 
TXINTE=B1T6 


+DECREMENT PROCESSOR STACK 1 WORD =TST -(SP) 


NT PROCESSOR STACK 1 WORD =TST (SP)+ 
ON STACK =MOV RO, -(SP) 

RO FROM STACK =MOV (SP)+,RO 

NT STACK TWICE =CMP -(SP),-(SP) 

NT STACK TWICE =CMP (SP)+, (SP)+ 


ITIONS 
4 SET CHANGE 


7 CLR TO SEND 

+ CARRIER DETECT 
sREC ACTIVE 

+SEC REC DATA 
;DATA SET RDY 

+ STRIP SYNC 

+REC DONE 

REC INTR ENABLE 
;OSC INTR ENABLE 
+SYNC SEARCH 
+SEC XMIT DATA 
REQ TO SEND 
*DATA TERM ROY 
NITIONS 
+REC ERROR 

; OVERRUN 

FRAME ERROR 
;PARITY ERROR 
NITIONS 

PARITY ENABLE 
>EVEN PARITY SENSE 
NITIONS 

+SYNC EXTERNAL MODE 
*+SYNC INTERNAL MODE 
> ISOC MODE 

+WORD LENGTH 5 BITS 
+WORD LENGTH 6 BITS 
;WORD LENGTH 7 BITS 
;WORD LENGTH 8 BITS 
+NO PARITY 

ODD PARITY 

+EVEN PARITY 


+ TXCSR BIT DEFINITIONS 


+DATA NOT AVAILABLE 
+ MAINT DATA 


+CLK 

+BIT WINDOW 
+MASTER RESET 

> XMIT DONE 

;>XMIT INTR ENABLE 


SEQ 0022 
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999 000040 DNAINTE=B1TS DNA INTR ENAB 
1000 000020 SEND=B 1 T4 + SEND 
1001 000010 HDXEN=B1T3 + HDX/F DX 
1002 000001 BREAK=B1T0O + BREA 
1003 + TXCSR WROD DEF INITIO 
1004 000000 USER=0 + USE 
1005 004000 MINT=4000 +MAINT INT MODE 
1006 010000 MEXT=10000 ;MAINT EXT MODE 
1007 014000 SYSTST=14000 + SYSTEM TEST MODE 
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SEQ 0023 
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DZ2DUSB. M11 31-MAY-77 09: 49 ERROR POINTER TABLE SEQ 0024 
pets .SBTTL ERROR POINTER TABLE 
1010 ;XTHIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
1011 ;XTHE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
1012 ;XLOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT. 
1013 + ¥NOTE1: IF SITEMB 1S O THE ONLY PERTINENT DATA IS (SERRPC). 
core + XNOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS 
1016 ;* EM ;+POINTS TO THE ERROR MESSAGE 
1017 ;x DH ++POINTS TO THE DATA HEADER 
1018 x OT +;POINTS TO THE DATA 
1019 re . OF ++POINTS TO THE DATA FORMAT 
1020 
1021 
1022 001652 SERRTB: 
1023 ERROR TABLE 
1024 001652 001762 EM1 ERROR 1 REGISTER ERROR 
1025 001654 002067 DH1 
1026 001656 002116 OT1 
1027 001660 002132 OF 1 
1028 001662 C02022 EN2 ERROR 2 RECEIVER ERROR 
1029 001664 002067 DH1 
1030 001666 002116 OT1 
1031 001670 002132 OF 1 
1032 001672 002043 EM3 sERROR 3 TRANSMITTER ERROR 
1033 001674 002067 DH1 
1034 001676 002116 OT1 
1035 001700 002132 OF 1 
1036 001702 001746 EM4 ERROR 4 BIT ERROR (GENERAL ) 
1037 001704 000000 0 
1038 001706 002126 OT4 
1039 001710 002132 OF 1 
1040 
1041 DEFAULT DU ADDRESSES 
1042 001712 160010 RXCSR: 160010 
1043 001714 160011 HRXCSR: 160011 
1044 001716 160012 RXOBUF: 160012 
1045 001720 160013 HR XDBUF : 160013 
1046 001722 160012 PARCSR: 160012 
1047 001724 160013 HPARCSR: 160013 
1048 001726 160014 TXCSR: 160014 
1049 001730 160015 HTXCSR: 160015 
1050 001732 160016 TXDBUF: 160016 
1051 001734 160017 HTXDBUF : 160017 
1052 *  iemaety DU VECTORS 
1053 001736 000770 DURIV: 770 ;REC INTR VECTOR 
1054 001740 000772 DURIS: 772 REC INTR STATUS 
1055 001742 000774 DUTIV: 774 +XMIT INTR VECTOR 
1056 001744 000776 DUTIS: 776 +XMIT INTR STATUS 
1057 ERROR MESSAGES 
1058 001746 020040 051105 047522 EN: .ASC!Z 7 ERROR PC 7 
1059 001754 020122 041520 O00040 
1060 001762 020040 047503 050115 EM!: .ASCIZ 7 COMPARISON ERROR ON REGISTERS/ 


1061 001770 051101 051511 047117 
1062 001776 O4244O0 051122 051117 
1063 002004 047440 020116 042522 
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002012 


002056 
002064 


002067 
002074 


002102 
002110 


002116 
002124 
002126 


002132 
002135 


000046 
000052 


000024 
000044 


002136 


002150 
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051117 


105 
020040 
042105 
052524 
002116 


001416 
000000 


001416 


000 
000 


0021 36 
000046 
012660 
000052 
000000 
002136 


002136 
000024 
000200 
000044 
002136 
002136 


000000 
001526 
000010 
000010 
000000 
000052 


052123 
042522 


051122 
040527 
020040 
046101 


001130 


000000 
0c9 


051105 
042503 


052124 
051122 


041520 
052116 
041501 

000 


001132 


000 


12 PAGE 27 
ERROR POINTER TABLE 


EN2: .ASCIZ 7 RECEIVER ERROR/ 


EMS: .ASCIZ 7 TRANSMITTER ERROR/Z 


DATA HEADERS FOR ERROR MESSAGES 
DHi1: .ASCIZ ZERRPC WANTED ACTUAL 


. EVEN 
DATA TABLES FOR ERROR MESSAGES 
OT1: . WORD SERRPC,HLOO. HLD1.0 


DT4: . WORD SERRPC,.O 
OF 1: ° BYTE 0, 0, 0,0 


. EVEN 
.SBTTL ACT11 HOOKS 


5 5 MHRAAAAAAA AAA AAA AAA AAA AAA AA AAA AAA AAA AAA AAR AAA AAA AA AAA EES 
;HOOKS REQUIRED BY ACTI1 
SSVPC=. SAVE PC 


.WORD O +22)SET LOC.52 TO ZERO 
. =$SVPC ++ RESTORE PC 
.SBTTL APT PARAMETER BLOCK 


py renner cement 
;SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
5 RARKAAAAAAAAAA AAA ART AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AES 
. $X=. +; SAVE CURRENT LOCATION 
224 3;;SET POWER FAIL TO POINT TO START OF PROGRAM 
200 7;FOR APT START UP 
=44 ;2POINT TO APT INDIRECT ADDRESS PNTR. 
SAPTHOR ;;POINT TO APT HEADER BLOCK 
=.$X ;; RESET LOCATION COUNTER 
Peeetstssttsstisstssttttitst iste sststtest ees ees sess cesses ests eee. 
; SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-POP11 DIAGNOSTIC 
; INTERFACE SPEC. 


SAP THD: 

SHIBTS: .WORD O ;; TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
SMBADR: .WORD SMAIL ;;ADORESS OF APT MAILBOX (BITS 0-15) 
STSTM: .WORD 10 ;;RUN TIM OF LONGEST TEST 


SPASTM: .WORD 10 ;;RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 


. 246 
—* ++ 1)SET LOC. 46 TO ADDRESS OF SENDAD IN . SEOP 


SEQ 0025 


SUNITM: . WORD 7; ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 


.WORD SETEND-SMAIL/2 >; LENGTH MAILBOX-ETABLE (WORDS) 


b2DUS 


002152 


002152 
002156 
002160 
002164 
002166 


002172 
002200 


002276 


002304 


002332 
002340 


002342 
002344 
002350 
002352 
002360 
002366 


002372 
002376 
002404 
002406 
002414 
002414 
002420 
002424 
0024 32 


te — 30(1046) 
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012706 
005026 
022706 
001374 
012706 


012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
005067 
005067 
112767 
012767 
012767 


013746 
012737 
012767 
012767 
022777 
001012 


000403 
012716 
000092 
012767 
012767 
012637 


005067 
132767 
001403 
012767 


012706 
106427 
012737 
105067 


001400 
001440 
001100 


016304 
000340 
014174 
000340 
016640 
000340 
014776 
000340 
177234 
177232 
000001 
002270 
002276 


000004 
002344 
177570 
177570 
177777 


002352 


000176 
000174 
000004 


177136 
000200 


001550 


001100 
000340 
014776 
176535 


000020 
000022 
006030 
000032 
000034 
000036 
000024 
000026 


177125 
177110 
177104 


000004 
177114 
177110 
177100 


177060 
177054 


177143 
177024 


000024 
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APT PARAMETER BLOCK 


+PROGRAM INITIALIZATION 

+LOCK OUT INTERRUPTS 

7 SET UP PROCESSOR STACK 

+SET UP POWER FAIL VECTOR 

+CLEAR PROGRAM CONTROL FLAGS AND COUNTS 
+ TYPE TITLE MESSAGE 


. START: 
.SBTTL INITIALIZE THE COMMON TAGS 
++>CLEAR THE COMMON TAGS (SCMTAG) AREA 
MOV agai +¢FIRST LOCATION TO BE CLEARED 
CLR (R6)+ >; CLEAR MEMORY LOCATION 
CMP #SWR,RG ;; DONE? 
BNE -6 ++LOOP BACK iF NO 
MoV #ESTACK, SP +;SETUP THE STACK POINTER 
+; INITIALIZE A FEW VECTORS a, 
MOV #SSCOPE, A#IOTVEC >; 10T VECTOR FOR SCOPE ROUTINE 
MOV #340, O#IOTVEC+2 7 > LEVEL 7 
MoV #SERROR, OHEMTVEC >> EMT VECTOR FOR ERROR ROUTINE 
MOV #340, OBENTVEC+2 7 > LEVEL 7 
MoV #STRAP. ASTRAPVEC ;; TRAP VECTOR FOR TRAP CALLS 
MOV #340, D#TRAPVEC+2; LEVEL 7 
MOV @SPWRON, O#PWRVEC ;; POWER FAILURE VECTOR 
MOV R340, O#PWRVEC+2 >> LEVEL 7 
CLR STIMES +; INITIALIZE NUMBER OF ITERATIONS 
CLR SESCAPE +;CLEAR THE ESCAPE ON ERROR ADDRESS 
MOVB #1, SERMAX +¢ALLOW ONE ERROR PER TEST 
MOV :. , SLPADR ++ INITIALIZE THE LOOP ADDRESS FOR SCOPE 
MOV , SLPERR +;SETUP THE ERROR LOOP ADDRESS 
;;SIZE FOR A HARDUARE SWITCH REGISTER. IF NOT FOUND OR IT IS 
+,EQUAL TO A "-1", SETUP FOR A SOFTWARE SWITCH REGISTER. 
MoV @RERRVEC.-(SP) ;; SAVE ERROR VECTOR 
MOV #64S, DFERRVEC 3:SET UP ERROR VECTOR 
MoV #DSWR, SHR +;SETUP FOR A HARDWARE SWICH REGISTER 
MoV #DDISP,.DISPLAY +>; AND A HARDWARE DISPLAY REGISTER 
CMP #-1, dSHR 72 TRY TO REFERENCE HARDWARE SWR 
BNE 66$ ++ BRANCH IF NO TIMEOUT TRAP OCCURRED 
;;RAND THE HARDWARE SWR IS NOT = - 
BR 65$ ;;BRANCH IF NO TIMEOUT 
64S: Hy #655, (SP) +>SET UP FOR TRAP RETURN 
RTI 
655: MOV #SWREG, SWR >+POINT TO SOFTWARE SWR 
MOV #D1SPREG. DISPLAY 
66S: MoV (SP)+, @#ERRVEC ;; RESTORE ERROR VECTOR 
CLR SPASS +;CLEAR PASS COUNT 
BITB RAPTSIZE.SENVM ;. TEST USER SIZE UNDER APT 
BEQ 67% ++ YES.USE NON-APT SWITCH 
MoV #SSWREG, SWR +;NO,USE APT SWITCH REGISTER 
675: 
MoV #STACK. SP ;SET STACK 
MTPS #340 >;LOCK INTERRUPTS 
MoV &. PFAIL,. d#24 >SET UP POWER FAIL VECTOR 
CLRB STFLG ;CLEAR START FLAG 


SEQ 0026 


















































002436 
002442 
002446 
002452 
002456 
002464 


002472 
002476 
002502 
002510 
002514 
002516 
002524 
002532 
002534 
002540 
002544 
002552 


002734 
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005067 


012767 


013746 
013746 
012737 
005777 
000407 
012767 
012767 
022626 
012637 
012637 
022767 
001007 
005737 
001402 
000167 
004767 
105767 


016767 


176450 
176735 
176740 
176740 
000001 
002152 


000006 
000004 
002516 
176724 


000176 
000174 


000004 
000006 
000176 


000042 


000522 
010170 
176374 


01£136 
176562 
176732 


000001 


176321 
000452 
000001 


0004 36 
000300 
000302 
000004 


001000 


014206 
014046 
176216 


21-SEP-77 09: 
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176716 
176412 


000004 


176714 


176710 


176666 
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INITIALIZE THE COMMON TAGS 


23: 


e “jou 


176726 


176574 


176226 
176212 


35: 


ONCE: 


12%: 


11S: 


1$: 


2S: 


. BYTE 
BYTE 


8 3 


PASCNT ;CLEAR PASS COUNT 

SERFLG + CLEAR ERROR FLAG 

SERTTL ; CLEAR ERROR COUNT 

SERRPC + CLEAR LAST ERROR POINTER 

#1, $TSTNM ;SET UP FOR TEST 1 

#. START, RETURN ;SET UP FOR POWER FAIL BEFORE 
+ TESTING STARTS 

a#6, -(SP) ‘ 

d#4,-(SP) 

#15, 084 

ASWR 

2% 

#SWREG, 


SWR 
#DISPREG, DISPLAY 
(SP)+, (SP)+ 


(SP) +, d#4 

(SP )+, d#6 

#SWREG. SWR 

3$ 

#42 CHECK FOR CHAIN 

33% 

. BEGIN 

PC, CNTLU 

—- ;HAS INITIALIZATION BEEN PERFORMED 
N 

/MTITLE TYPE TITLE MESSAGE 
INIFLG ;1F NOT SET FLAG AND DO 

SENV ;APT CONTROL? 

11% BR IF NO 

#1, SUSUR * EXTENAL JUMPER ON? 

12$ NO 

JMRBY ; CLEAR FLAG 

. BEGIN +GO DO IT 

oo ; RESELECT VECTOR & CONTROL REG? 
. BEGIN 


#300,R0 ;RESTORE VECTOR AREA TO TRAPCATCHER 
#302,R1 >; START AT LOCATION 300 


#1000, R1 END AT LOCATION 776 


2$ 

;QUTPUT MESSAGE & GET INPUT STRING 
; MESSAGE 

+ CONVERT STRING 

+ LOW ge 

HIGH LIMIT 

; STORE ar THIS LOCATION 

+ MASK 

;HOW MANY TIMES + 2 

DUBASE.KEEPADD ; SAVE 

PC, DUADDR 

KEEPADD, BASEADD ; RESTORE FOR ROTATION 
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002742 
002744 


003004 


003010 
003012 
003016 
003022 
003026 
003026 
003030 
003032 
003034 
003036 
003040 
003042 
003043 


003044 
003052 
003056 
003064 
003066 
003072 
003074 
003102 
003110 
003112 


003120 


003166 


31-MAY-77 0 


104406 


001152 
105767 


100406 
005067 
005067 
000167 


104406 
015263 


056767 


012767 
016767 
000414 
016767 


000167 
012767 


Cc 3 
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INITIALIZE THE COMMON TAGS SEQ 0028 
INSTR + OUTPUT MESSAGE & GET INPUT STRING 
MVECTO ; MESSAGE 
PARAN ; CONVERT STRING 
300 +LOW LIMIT 
776 sHI 1GH" MIT 
DUR IV STORE” at THIS LOCATION 
.BYTE 1 + MASK 
.BYTE 4 +HOW MANY TIMES + 2 
176752 176176 MOV OUR IV, KEEP IY + SAVE 
176744 176166 MOV DUR IV, BASE IV +SET UP FOR ROTATION 
INSTR ;OUTPUT MESSAGE & GET INPUT STRING 
MMULT ; MESSAGE 
SETFLG ;SET FLAG BASED UPON INPUT STRING 
MULTD ; THIS FLAG 
176142 TSTB MULTD ;ARE THERE +> DEVICES 
ON THE SYSTE 
BNI BBB + YES. ASK NEXT "QUEST ION 
176150 CLR ACTREG 
176146 CLR ROTADD 
000140 _ JMP OUTMUL ; JUMP AROUND NEXT QUESTION 
INSTR ;OUTPUT MESSAGE & GET INPUT STRING 
MLASTD ; MESSAGE 
PARAM ;:CONVERT STRING 
160000 ;LOW re 
167776 =; HIGH LIMIT 
LASTAGD ; STORE ar THIS LOCATION 
. BYTE : ; MASK 
. BYTE ;HOW MANY TIMES + 2 
; THE FOLLOWING ROUTINE SETS UP ACTREG FOR THE FIRST TIME 
000001 176116 1%: MOV #1,ROTADD + SET UP POINTER 
176110 CLR ACTREG ;CLR ACTIVE REGISTER 
176106 176102 2%: ae ROTADD.ACTREG -;MAKE THIS DEVICE ACTIVE 
L 
176076 ROL ROTADD ;SET UP POINTER 
BCS 3% ARE YOU OUT OF RANGE ? 
000010 176052 ADD #10, BASEADD +SET UP BASE ADDRESS 
176052 176044 CMP LASTADD. BASEADD ; 1S THIS THE LAST DEVICE ? 
BHI 2$ +NO DO IT AGAIN 
176052 176046 BIS ROTADD.ACTREG ;THIS ASSUMES THAT THERE ARE AT 
;LEAST TWO DEVICES WHEN YOU ANSWER YES TO 
;MULTIPLE DEVICE QUESTION 
000001 176042 4S: MoV #1,ROTADD ;SET UP FOR LATER USE IN END OF PASS ROUTINE 
176024 176020 MoV KEEPADD. BASEADD ; DITTO 
BR OUTMUL ;CONTINUE QUESTIONS 
176014 176010 33%: MOV KEEPADD, BASEADD ; RESTORE 
INSTR ;OUTPUT MESSAGE & GET INPUT STRING 
MRANGE ; MESSAGE 
PARAM ;CONVERT STRING 
160000 ;LOW pr 
167776 =; HIGH LIMIT 
LASTADD + STORE ar THIS LOCATION 
.BYTE 1 MASK 
.BYTE 1 ; HOW MANY TIMES + 2 
177656 JMP 1$ +00 IT AGAIN 
000340 013602 OUTMUL: MOV #340, DUPRT 
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DZDUSB. M11 


1288 
9 


003174 


003200 
003200 
003202 
003204 
003212 
003214 
003220 
003222 
003230 
003232 
003240 
003242 
003244 
003246 
003250 
003252 
003254 
003256 
003260 
003262 
003264 
003266 
003270 
003272 
003274 
003276 
003300 
003302 
003304 
003306 


003310 
003314 


003364 
003370 


31-MAY-7 
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104406 
015575 
122767 
001003 
105067 
000412 
122767 
001004 
112767 
000402 
104407 
000757 
000240 
104406 
015643 
104414 
001147 
104406 
015714 
104414 
001150 
104406 
015764 
104414 
001151 
104406 
016043 
104414 
001153 


012706 
106427 
032777 
001413 
104496 


000177 
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013526 


000061 
175726 
000062 
177777 


001100 
000340 
000002 


176030 


003374 
015523 
175510 


012724 


012706 
175706 


176112 


175530 
175520 


0 3 
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Aaa: 


34: 


15: 


23: 
4S: 


. BEGIN: 


. BYTE 


35: 
4$: 


JSR PC, OULEV 

+ COMPARE THE FIRST CHARACTER + THE TELETYPE INPUT 
*BUFFER TO THE CHARACTERS "1" AND "2". 

;1F THE CHARACTER IS "1" CLEAR THE FLAG 

+ 'F THE CHARACTER IS np" SET THE FLAG 


INSTR ;OUTPUT MESSAGE & GET INPUT STRING 
MSYNC ; MESSAGE 


CMPB #'1, INBUF s1S 17 "4" 7 
BNE 1$ 

CLRB SYNCNO ;000 

BR 4$ 

CMPB #'2, |NBUF s1S 17 “2" 7 
BNE 2$ 

MOVB #-1, SYNCNO +377 

BR 4§ 

INSTER ;RETRY 

BR 3$ 

NOP 


INSTR ;QUTPUT MESSAGE & GET INPUT STRING 
MWIREG > MESSAGE 

SETFLG ;SET FLAG BASED UPON INPUT STRING 
SEXMIT ;THIS FLAG 

INSTR ;OUTPUT MESSAGE & GET INPUT STRING 
MWIRES ; MESSAGE 

SETFLG ;SET FLAG BASED UPON INPUT STRING 
SEREC ; THIS FLAG 

INSTR ;OUTPUT MESSAGE & GET INPUT STRING 


+ MESSAGE 
SETFLG ;SET FLAG BASED UPON INPUT STRING 
OPTCLR ; THIS FLAG 
INSTR ;QUTPUT MESSAGE & GET INPUT STRING 
MEXTJ ;MESSAGE 
SETFLG ;SET FLAG BASED UPON INPUT STRING 
JMRBY ; THIS FLAG 


+; TEST START AND RESTART 


MOV #STACK. SP +SET UP STACK 


MTPS #340 *LOCK OUT INTERRUPTS 
BiT #SWO1, ASR + 1F SWO1=1, GET STARTING PC 
BEQ 


3$ 
INSTR ;OUTPUT MESSAGE & GET INPUT STRING 
MTSTPC =; MESSAGE 
PARAM ; CONVERT STRING 
TST1 ;LOW LIMIT 
17500 ;HnIGH LIMIT 
STSTNM ;STORE AT THIS LOCATION 


1 + MASK 

1 +HOW MANY TIMES + 2 

MoV STSTNM. RETURN 

BR 4§ 

MOV #TST1,RETURN +START AT TEST 1 
TYPE TYPE R 


TR YPE 
JMP ORE TURN START TESTING 


SEQ 0029 
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1344 
1345 


003374 
003376 
003404 
003412 


003420 


003426 
003434 


003442 
003450 
003456 
003462 
003466 
003474 
003502 
003506 
003512 
003514 
003516 
003522 
003524 
003526 


003530 
003536 
003544 


003550 
003556 
003564 
003570 


003574 
003600 
003602 
003604 
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000004 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 
016703 
012700 
012767 
012767 
004767 
105777 
100401 
104004 
017701 
020001 
001401 
104002 


012767 
012767 
004767 


012767 
012767 
004767 
012700 


017701 
020001 
001401 
104002 


000400 
020000 
000400 


064001 


024000 
000020 


020000 
020000 
176234 
000177 
00C007 
000177 
013430 
176200 


176174 


000007 
000177 
013366 


000007 
000177 
013346 
140177 


176116 


176322 
176310 
176306 


176300 


176266 
176250 


176256 
176250 


175426 
175776 


175364 
175734 


175344 
175714 


e 3 er en Fk ae ane kee wd 
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INITIALIZE THE COMMON TAGS 


++ THIS TEST VERIFYS WORD LENGTH SELECT OF THE 
+s RECEIVER SECTION, IT USES THE ERROR FLAGS 
++TO0 DETERMINE THAT IT WAS SELECTED CORRECTLY 
++ COVRRUN. RXERR) 

++ MODE: SYNEXT 

++ LENGTH: te 

++ CHAR: 177 


j; #SSAEESAAESSOAESSSNESEANESEANSESNESESAAATSAAETSAAEESNALISNESS 


TST1 
BIS #MRESET,@TXCSR ;MASTER RESET 
MOV #SYNEXT, @PARCSR ; SET THE MODE 
BIS #MRESET,@TXCSR {MASTER RESET 


;SET MAINT DATA, CLK, BREAK, BMAINTENANCE MODE 
MOV RMTOATAICLK! MINT! BREAK, ATXCSR 


;SET MODE .# OF BITS.PARITY SENSE,&LOAD SYNC REG 
MOV #SYNEXT! SEVEN! NOPAR !0, dPARCSR 
BIS #SYNSCH. @RXCSR > SET SEARCH SYNC 
;POKE oe hy GET LOGIC INTO SYNCRONIZATION 


#CLK, ATXCSR +POKE CLK a ‘ 
BIS #CLK, ATXCSR ;POKE CLK 
MOV RXDBUF.R3 + SET UP FOR ERROR MESSAGE 
MoV #177,RO0 ; EXPECTED 
MOV #7, SHIFT 7# OF SHIFTS 
MoV #177, STMP1 DATA CHA 


R 
K + SHIFT IN THIS CHAR 
TSTB ARKCSR ;+RXDONE ? 


BMI +4 

ERROR 4 ; RXDONE SHOULD BE SET 

MOV OR XOBUF.R1 ACTUAL 

ay RO,R1 ; COMPARE EXPECTED VS. ACTUAL 

Q . +4 

ERROR 2 ;RECEIVED DATA DID NOT MATCH 
;EXPECTED DATA - CHECK MAINT DATA 
7OR RECEIVER LOGIC 

MOV #7, SHIFT +*# OF SHIFTS 

MoV #177, STMP1 +DATA CHAR 

JSR PC, RPOKE +SHIFT IN THIS CHAR 

;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF 
MoV #7, SHIFT +# OF SHIFTS 
MoV tA dg DATA CHAR 


RPOK +SHIFT IN THIS CHAR 
MoV #140000! 177, RG -;EXPECTED DATA PLUS 
+ RXERR & OVRRUN 


MOV OR XDBUF,. R1 ACTUAL 

CMP RO, R1 ; COMPARE EXP VS. ACT 

BEQ . +4 

ERROR 2 + SPECIFICALLY LOOK AT RXERR & 


;OVRRUN BITS... THEY BOTH SHOULD BE SET 


7, THIS TEST VERIFYS WORD LENGTH SELECT OF THE 
;;RECEIVER SECTION, IT USES THE ERROR FLAGS 
;:TO DETERMINE THAT IT WAS SELECTED CORRECTLY 
++ COVRRUN, RXERR ) 


SEQ 0030 
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003606 
003610 
003616 
003624 


003632 


003640 
003646 


003654 
003662 
003670 
003674 
003700 
003706 
003714 
003720 
003724 
003726 
003730 
003734 
003736 
003740 


003742 
003750 
003756 


003762 
003770 
003776 
004002 


004006 
004012 
004014 
004016 
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000004 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 
016703 
012700 
012767 
012767 
004767 
105777 
100401 
104004 
017701 
020001 
001401 
104002 


012767 
012767 
004767 


012767 
012767 
004767 
012700 


017791 
020001 
001401 
104002 


09: 


000400 
020000 
060400 


064001 


024000 
000020 


020000 
020000 
176022 
000000 
000007 
000000 
013216 
175766 


175762 


000007 
000009 
013154 


000007 
000000 
013134 
140000 


175704 


176110 
176076 
176074 


176066 


176054 
176036 


176044 
176036 


176214 
175564 


175152 
175522 


175132 
175502 
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INITIALIZE THE COMMON TAGS 
++ MODE: SYNEXT 


oe 


_ SEE 


TST2: 
BIS 
MOV 
BIS 


++ LENGTH: SEVEN 
AR: 0 


MMRESET.@TXCSR ; MASTER RESET 
WSYNEXT, @PARCSR ; SET THE MODE 
WMRESET,@TXCSR {MASTER RESET 


+ SET MAINT DATA, CLK, BREAK, &MAINTENANCE MODE 


MoV #MTDATAICLK'MINT! BREAK, dTXCSR 
;SET MODE .# OF BITS,.PARITY SENSE. &LOAD SYNC REG 
MOV #SYNEXT! SEVEN! NOPAR '0, dPARCSR 
BIS #SYNSCH, ARXCSR ;SET SEARCH SYNC 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, ATXCSR + POKE ae DOWN 
Bis #CLK, ATXCSR +POKE CLK UP 
MoV RXDBUF,.R3 > SET UP FOR ERROR MESSAGE 
MoV #0,R0 + EXPECTED 
MOV #7, SHIFT 7# OF SHIFTS 
MOV #0, STMP1 ;DATA CHAR 
JSR PC, RPOKE ; SHIFT IN THIS CHAR 
TSTB @RXCSR ;RXDONE ? 
BMI . +4 
ERROR 4 ; RXDONE og A BE SET 
MoV ORXDBUF, R1 ACTU 
CMP RO. R1 > COMPARE. EXPECTED VS. ACTUAL 
BEQ _ +4 
ERROR 2 ;RECEIVED DATA DID NOT MATCH 
; EXPECTED DATA - CHECK MAINT DATA 
7OR RECEIVER LOGIC 
MOV #7, SHIFT ># OF SHIFTS 
MoV gp ne ;DATA CHAR 
JSR PC, RPOKE ; SHIFT IN THIS CHAR 
NOW SHIFT IN A Ait CHARACTER WITHOUT READING RXDBUF 
MOV #7, SHIFT ;# OF SHIFTS 
MOV #0, STMP 1 ;DATA CHAR 
JSR PC, RPOKE ; SHIFT IN THIS CHAR 
MOV #140000'0,R0 ;EXPECTED DATA PLUS 
>RXERR & OVRRUN 
MOV ORXOBUF.R1 > ACTUAL 
CMP RO.R1 ; COMPARE EXP VS. ACT 
BEQ +4 
ERROR 2 + SPECIFICALLY LOOK AT RXERR & 


;OVRRUN BITS... THEY BOTH SHOULD BE SET 


3, THIS TEST VERIFYS WORD LENGTH SELECT OF THE 
> RECEIVER SECTION. IT USES THE ERROR FLAGS 
5:70 DETERMINE THAT IT WAS SELECTED CORRECTLY 
3; COVRRUN, RXERR) 

;; MODE: SYNEXT 

;; LENGTH: EIGHT 

>; CHAR: 125 


SEQ 0031 


b2D 
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1456 5s RXXKAAAAAAAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AA AAA AAAS 
1457 004020 000004 TST3: SCOPE 
1458 004022 052777 OO0400 175676 BIS @MRESET. @TXCSR ;MASTER RESET 
1459 004030 012777 O20000 175664 MOV #SYNEXT, OPP CSR >; SET THE MODE 
ery 004036 052777 OO0O400 175662 BIS #MRESET. @TXCSR ;MASTER RESET 
1462 ;SET MAINT DATA, CLK, BREAK. BMAINTENANCE MODE 
pean 004044 012777 O684001 175654 MOV #MTOATA!CLK!MINT! BREAK, dTXCSR 
1465 ;SET MODE .# OF BITS.PARITY SENSE. &LOAD SYNC REG 
1466 004052 012777 O26000 175642 MoV #SYNEXT!E IGHT! NOPAR '0, dPARCSR 
1467 004060 052777 000020 175624 BIS #SYNSCH, ARXCSR ;SET SEARCH SYNC 
1468 ;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
1469 004066 042777 O20000 175632 BIC #CLK, ATXCSR + POKE a DOWN 
1470 004074 052777 O20000 175624 BiS as ;POKE CLK UP 
1471 004102 016703 175610 MoV RXOBUF,R3 ;SET UP FOR ERROR MESSAGE 
1472 004106 012700 000125 MoV #125. RO > EXPECTED 
1473 004112 012767 O00010 175002 MOV #8. .SHIF T ;# OF SHIFTS 
1474 004120 012767 000125 175352 MoV #125, STMP1 ;DATA CHAR 
1475 004126 004767 013004 JSR PC, RPOKE ;SHIFT IN THIS CHAR 
1476 004132 105777 175554 TSTB @RXCSR ;RXDONE ? 
1477 004136 100401 BNI +4 
1478 004140 104004 ERROR 4 ; RXDONE oars BE SET 
1479 004142 017701 175550 MoV ORXDBUF. R1 ;ACTU 
1480 004146 020001 CMP RO, R1 ; COMPARE EXPECTED VS. ACTUAL 
1481 004150 001401 BEQ . +4 
1482 004152 104002 ERRCR 2 ;RECEIVED DATA DID NOT MATCH 
1483 ; EXPECTED DATA - CHECK MAINT DATA 
1484 7OR RECEIVER LOGIC 
1485 004154 012767 O00010 174740 MOV #8., SHIFT ;# OF SHIFTS 
1486 004162 012767 000125 175310 MOV #125, STMP1 ;DATA CHAR 
1487 004170 004767 012742 JSR PC, RPOKE ; SHIFT IN THIS CHAR 
1488 ;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXOBUF 
1489 004174 012767 000010 174720 MoV #8... SHIFT ;# OF SHIFTS 
14990 004202 012767 000125 175270 MOV #125, STMP1 ; DATA CHAR ‘ 
1"91 004210 004767 012722 JSR PC, RPOKE ; SHIFT IN THIS CHAR 
1492 004214 012700 140125 MoV #140000'!125,R0 ;EXPECTED DATA PLUS 
1493 ;RXERR & OVRRUN 
1494 004220 017701 175472 MOV ORXDBUF,R1 > ACTUAL 
1495 004224 020001 CMP RO. R1 ;COMPARE EXP VS. ACT 
1496 004226 001401 BEQ +4 
1497 004230 104002 ERROR 2 ; SPECIFICALLY LOOK AT RXERR & 
1498 ; OVRRUN BITS... THEY BOTH SHOULD BE SET 
1499 , 
1500 >; THIS TEST VERIFYS WORD LENGTH SELECT OF THE 
1501 >; RECEIVER SECTION. IT USES THE ERROR FLAGS 
1502 3:70 DETERMINE THAT IT WAS SELECTED CORRECTLY 
1503 3; COVRRUN., RXERR) 
1504 ;; MODE: SYNEXT 
1505 >; LENGTH: E 1GHT 
1506 32 CHAR: 252 
1507 33 
1508 Fee O55 $5555555550950000500000 0000 ete reel eee e eee eel ell ele 88858 8 8 | 
1509 004232 000004 TST4: SCOPE 
1510 004234 052777 OOO40O0 175464 BIS @MRESET. @TXCSR ;MASTER RESET 
1511 004242 012777 OZO0000 175452 MoV #SYNEXT. @PARCSR > SET THE MODE 


SEQ wi! 


DZDUS-B MACY11 30(1046) 


DZDUSB. M11 


1512 
1513 
1514 
1515 


004250 


004256 


004264 
004272 


004300 
004 306 
004314 
004320 
004324 
004332 
004 340 
004 344 
004350 
004352 
004 354 
004 360 
004 362 
004 364 


004 366 
004374 
004402 


004406 
004414 
004422 
0044 26 


004432 
0044 36 
004440 
004442 


004444 
004446 
004454 
004462 


004470 
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052777 


012777 


012777 
052777 


042777 


104002 


012767 
012767 
004767 


012767 
012767 
004767 
012700 


017701 
020001 
001401 
104002 


000004 
052777 
012777 
052777 


012777 


000400 


064001 


026000 
000020 


020009 
020000 
175376 
000252 
000010 
000252 
012572 
175342 


175336 


000010 
000252 
012530 


000010 
000252 
012510 
140252 


175260 


000400 
020000 
000400 


064001 
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175450 


175442 


175430 
175412 


175420 
175412 


174570 
175140 


174526 
175076 


174506 
175056 


175252 
175240 
175236 


175230 


H 3 


BIS #MRESET,@TXCSR ; MASTER RESET 


+ SET saag DATA. CLK. BREAK, &MAINTENANCE MODE 


#MTDATA!CLK!IMINT!BREAK, dTXCSR 


SET MODE .# OF BITS,PARITY SENSE. &LOAD SYNC REG 


MOV #SYNEXT!E IGHT!NOPAR!0, @PARCSR 
#SYNSCH, @RXCSR + SET SEARCH SYNC 


BIS 
+ POKE ~ = GET LOGIC INTO SYNCRONIZATION 


#CLK, aTXCSR + POKE 7: Nae 
BIS re +POKE CLK 
;SET UP FOR ERROR MESSAGE 


0 

MOV #8... SHIF ;# OF SHIFTS 

MOV $252, STHP DATA CHAR 

JSR PC, RPOKE + SHIFT IN THIS CHAR 

ny —s +RXDONE ? 

MI ‘ 

ERROR ¥ ;RXDONE SHOULD BE SET 

MOV ORXOBUF, R1 + ACTUAL 

cnP RO.R1 ;COMPARE EXPECTED VS. ACTUAL 

BEQ _ +4 

ERROR 2 *;RECEIVED DATA DID NOT MATCH 
+ EXPECTED DATA - CHECK MAINT DATA 
OR RECEIVER LOGIC 

MOV #8. SHIFT +# OF SHIFTS 

MOV #252, STMP1 DATA CHAR 

JSR PC, RPOKE +SHIFT IN THIS CHAR 


;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF 
MOV 


#8..SHIFT :# OF SHIFTS 
MOV #252, STMP1 DATA CHAR 
E +SHIFT IN THIS CHAR 
MOV #140000! 252. RO ;EXPECTEC DATA PLUS 
+ RXERR & OVRRUN 


MOV ORXOBUF. R1 ACTUAL 

CMP RO, R1 ; COMPARE. EXP VS. ACT 

BEQ +4 

ERROR 2 >SPECIFICALLY LOOK AT RXERR & 


> OVRRUN BITS... THEY BOTH SHOULD BE SET 


32 THIS TEST VERIFYS WORD LENGTH SELECT OF THE 
;;RECEIVER SECTION, IT USES THE ERROR FLAGS 
3370 DETERMINE THAT IT WAS SELECTED CORRECTLY 
++ COVRRUN, RXERR) 

:;MODE: SYNEXT 

;; LENGTH: E 1GHT 

3; CHAR: 377 


PETTITT Titi tte titi ttt ttt ttt iste tet iste tt ttt tet tt itt iit tits 
STS: SCOPE 


BIS RMRESET, @TXCSR -;MASTER RESET 
MOV #SYNEXT, @PARCSR > SET THE MODE 
BIS RMRESET,@TXCSR -; MASTER RESET 


;SET MAINT DATA. CLK, BREAK. BMAINTENANCE MODE 
MOV 


SMNTDATA'CLK!MINT!BREAK. dT¥CSR 


SEQ 0033 


DZDUS-B MACY11 30(1046) 


DZ0USB. M11 


004476 
004504 


004512 
004520 
004526 
004532 
004536 
004544 
004552 
004556 
004562 
004564 
004566 
004572 
004574 
004576 


004600 
004606 
004614 


004620 
004626 
004634 
004640 
ooveby 
004650 
004652 
004654 


004656 
004660 
004666 
004674 


004702 


004710 
004716 
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012777 
052777 


042777 
052777 
016703 
012700 
012767 
012767 
004767 
10&777 
100401 
104004 
017701 
020001 
001401 
104002 


012767 
012767 
004767 


012767 
012767 
004767 
012700 


017701 
020001 
001401 
104002 


0CC:304 
052777 
012777 
052777 


012777 


012777 
052777 


026000 
000020 


020000 
020000 
175164 
000377 
000019 
000377 
012360 
175130 


175124 


000010 
000377 
012316 


000010 
000577 
012276 
140377 


175046 


000400 
020000 
000400 


064001 


J26000 
000020 


175216 
175200 


175206 
175200 


174356 
174726 


174314 
174664 


174274 
174644 


175040 
175026 
175024 


175016 


175004 
174766 
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1 3 
OMMON TAGS 


;SET MODE .# OF BITS.PARITY SENSE. &LOAD SYNC REG 
MOV #SYNEXT!E IGHT!NOPAR !0, @PARCSR 


BIS #SYNSCH, ARXCSR ;SET SEARCH SYNC 
;POKE CLK TO GET oe INTO SYNCRONIZATION 
BIC #CLK, dTXCSR + POKE a ae 
BIS CLK. aTXCSR ;POKE CLK 
MoV RXDBUF,R3 > SET UP FOR * crnon MESSAGE 
MOV #377,R0 > EXPECTED 
MOV #8., SHIFT ;# OF SHIFTS 
MOV #377, STMP1 ;DATA CHAR 
JSR PC, RPOKE ;SHIFT IN THIS CHAR 
TSTB @RXCSR ;RXDONE ? 
BMI . +4 
ERROR 4 ;RXDONE SHOULD BE SET 
MoV ORXOBUF,R1 +> ACTUAL 
in RO,R1 ; COMPARE EXPECTED VS. ACTUAL 
. +4 
ERROR 2 ;RECEIVED DATA DID NOT MATCH 
; EXPECTED DATA - CHECK MAINT DATA 
;OR RECEIVER LOGIC 
MOV #8. , SHIFT ;# OF SHIFTS 
MOV #377, STMP1 ;DATA CHA 
JSR PC, RPOKE ; SHIFT IN THIS CHAR 
;NOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF 
MOV #8., SHIFT ;# OF SHIFTS 
MoV #377, STMP1 ; DATA CHAR 
JSR PC, RPOKE ; SHIFT IN THIS CHAR 
MOV #140000!377,R0 ;EXPECTED DATA PLUS 
+RXERR & OVRRUN 
MOV AR XDBUF, R1 ; ACTUAL 
CMP RO, R1 > COMPARE. EXP VS. ACT 
BEQ . +4 
ERROR 2 ; SPECIFICALLY LOOK AT RXERR & 


;OVRRUN BITS... 


;; THIS TEST VERIFYS WORD LENGTH SELECT OF THE 
7; RECEIVER SECTION, IT USES THE ERROR FLAGS 

7:70 DETERMINE THAT IT WAS SELECTED CORRECTLY 
72 COVRRUN, RXERR ) 


>;MODE: S 


YNEXT 


;; LENGTH: E |GHT 


7; CHAR: O 


PETTITT TTT titi e ttt ttt ett ist ett ett ettttttt itt sttttt ett st test 


TST6: SCOPE 


#MRESET, ATXCSR 


;MASTER RESET 


#SYNEXT, @PARCSR >; SET THE MODE 


#MRESET. @TXCSR 


*MASTER RESET 


> SET MA! you DATA, CLK, BREAK, &MAINTENANCE MODE 
MOV SMTDATA!CLK! MINT! BREAK, dTXCSR 


> SET MODE ,# OF BITS.PARITY SENSE.&LOAD SYNC REG 
MOV #SYNEXT!E 1GHT!NOPAR '0. dPARCSR 


BIS 


#SYNSCH, ORXCSR 


+ SET SEARCH SYNC 


THEY BOTH SHOULD BE SET 


SEQ 0034 
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1624 ;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 

1625 004724 042777 O20000 174774 BIC #CLK, ATXCSR +POKE CL : - 

1626 004732 052777 O20000 174766 BIS ACLK, dTXCSR +POKE CLK 

1627 004740 016703 174752 MoV RXOBUF. R3 +SET UP FoR ERROR MESSAGE 
1628 004744 012700 000000 MOV #0,RO0 ;EXPECTED 

1629 004750 012767 OO0010 174144 MOV #8., SHIFT ;# OF SHIFTS 

1630 004756 012767 OOO000 174514 MoV #0, STMP1 >DATA CHAR 

1631 004764 004767 pha bry JSR PC, RPOKE +SHIFT IN THIS CHAR 
1632 004770 105777 174716 TSTB — >RXDONE ? 

1633 004774 100401 BMI : 

1634 004776 104004 ERROR y +> RXDONE SHOULD BE SET 

1635 005000 017701 174712 MoV ORXOBUF, R1 CTUAL 

1636 005004 02C001 CMP RO, R1 ; COMPARE. EXPECTED VS. ACTUAL 
1637 005006 001401 BEQ +4 

1638 005010 104002 ERROR 2 ;RECEIVED DATA DID NOT MATCH 
1639 > EXPECTED DATA - CHECK MAINT DATA 
1640 ;OR RECEIVER LOGIC 

1641 005012 012767 000010 174102 MoV #8., SHIFT ;*# OF SHIFTS 

1642 005020 012767 GOO000 174452 MoV #0, STMP1 ;DATA CHAR 

1643 005026 004767 012104 JSR PC, RPOKE ; SHIFT IN THIS CHAR 
1644 iNOW SHIFT IN A SECOND CHARACTER WITHOUT READING RXDBUF 
1645 005032 012767 O00010 174062 MOV #8., SHIFT ;# OF SHIFTS 

1646 O0S040 012767 OO0000 174432 MoV #0, STMP1 ;DATA CHAR 

1647 005046 004767 012064 JSR PC, RPOKE ; SHIFT IN THIS CHAR 
1648 005052 012700 140000 MOV #140000'!0,R0 ;EXPECTED DATA PLUS 
1649 ;RXERR & OVRRUN 

1650 005056 017701 17434 MOV ORXDBUF, R1 > ACTUAL 

1651 005062 020001 CMP RO. R1 ; COMPARE EXP VS. ACT 

1652 005064 001401 BEQ +4 

1653 005066 104002 ERROR 2 ; SPECIFICALLY LOOK AT RXERR & 
oe ;OVRRUN BITS... THEY BOTH SHOULD BE SET 
16 

1656 ;; THIS TEST VERIFYS WORD LENGTH SELECT OF RECE!VER 
1657 ;;SECTION . IT USES THE ERROR FLAGS TO DETERMINE 
1658 3; THAT IT WAS SELECTED PROPERLY 

1659 7;FRAME ERROR (CFRMERR, RXERR) 

1660 ;;MODE: ISOC CISYMOD) 

1661 +; LENGTH: FIVE 

1662 >; CHAR: 25 

1663 ‘a 

1664 3b AXKXKKAAAAAAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA 
1665 005070 000004 TST?: SCOPE 

1666 005072 052777 OOO400 174626 BIS #MRESET.@TXCSR ;MASTER RESET 

1667 005100 012777 OO0000 174614 MOV #ISYMOD, @PARCSR ; SET THE MODE 

1668 005106 052777 OOO40O0 174612 BIS @MRESET. @TXCSR ;MASTER RESET 

1669 

1670 ;SET MAINT DATA, CLK. BREAK. &BMAINTENANCE MODE 

1671 005114 012777 O684001 174604 MoV #NTDATA!CLK! MINT! BREAK, dTXCSR 

1672 

1673 ;SET MODE .# OF BITS.PARITY SENSE.&LOAD SYNC REG 

1674 005122 012777 OOOO00O0 174572 MoV #ISYMOD!F IVE '!NOPAR!0, aPARCSR 

1675 005130 052777 000020 174554 BIS @SYNSCH, ARXCSR ;SET SYNC SEARCH 

1676 ;POKE CLK TO GET RECEIVER INTO SYNCROIZATION... 
1677 005136 042777 O20000 174562 BIC #CLK, ATXCSR ;POKE CLK DOWN 

1678 005144 052777 O20000 174554 BIS #CLK, ATXCSR ;POKE CLK UP 


;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 


005152 
005160 
005166 
005174 


005202 
005206 
005212 
005216 
005222 
005224 
005226 


005230 
005232 
005240 
005246 


005254 
005262 


005270 


005276 
005304 


005312 


ey MACY 11 ped gy 
DZ0USB. M11 Y-77 


31-MA 


042777 
052777 
012767 
012767 


004767 
016703 
012700 
017701 
020001 
001401 
104000 


000004 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 


042777 
052777 
012767 
012767 


004767 
016703 
012700 
017701 
020001 
001401 
104000 
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020000 
020000 
000007 
000052 


011730 
174504 
120025 
174474 


00C400 
000u00 
000400 


064001 


002000 
000020 


020000 
020000 


020000 
020000 
000010 
000052 


011570 
174344 
120025 
174334 


174546 
174540 
173726 
174276 


174466 
174454 
174452 


174444 


174432 
174414 


174422 
174414 


174406 
174400 
173566 
174136 


K 3 
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BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK, @TXCSR +POKE CLK UP 
MOV aos ate iff . SHIFTS 
MOV #52. $TM +DATA CHAR 
+NOTE: THE ABOVE CHARACTER 1S MISSING STOP BIT 
JSR PC, RPOKE +SHIFT IN THIS CHAR 
MOV RXDBUF,. R3 FOR ERROR MESSAGE 
MOV @RXERR!FRMERR! 25, RO + EXPECTED 
MOV ORXOBUF. R1 + ACTUAL 
CMP RO.R1 ;COMPARE EXP VS ACT 


BEQ . +4 

ERROR ;FRAME ERROR 4 & RX ERROR SHOULD BE SET 
+ 1F LOWER BYTE DOES NOT MATCH IT 
PROBABLY IS A LENGTH SELECT PROBLEM 


7; THIS TEST VERIFYS WORD LENGTH SELECT OF RECEIVER 
;;SECTION . IT USES THE ERROR FLAGS TO DETERMINE 

+; THAT IT WAS SELECTED PROPERLY 

7; FRAME ERROR (FRMERR, RXERR) 

;;MODE: ISOC CISYMOD) 

++ LENGTH: SIX 

7;CHAR: 25 


os MXXKKAAAAAAA AERA AAA A AAA AAA AAA AA AAA AAA AAA AAA AAA AERA KEES 
TST10: SCOPE 

BIS #MRESET,@TXCSR ; MASTER RESET 

MoV #ISYMOD, APARCSR ; SET THE MODE 

BIS #MRESET.@TXCSR -;MASTER RESET 


+ SET a © ena > BREAK. &MAINTENANCE MODE 
#MTDATA!CLK! MINT! BREAK. aTXCSR 


+ SET ang ,# OF BITS,.PARITY SENSE. &LOAD SYNC REG 
MOV # ISYMOD!S1X!NOPAR!0, @PARCSR 
BIS RSYNSCH, ARXCSR ;SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROI ZATION. 
BIC #CLK, aTXCSR +POKE CLK DOWN 
BIS #CLK. ATXCSR ;POKE CLK UP 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, ATXCSR *+POKE CLK DOWN 
BIS #CLK, @TXCSR +POKE CLK UP 
MOV #8. SHIFT +# OF SHIFTS 
MOV #52. STHP1 DATA CHAR 
+NOTE: THE ABOVE CHARACTER IS MISSING STOP BIT 
JSR C, RPOKE + SHIFT IN THIS CHAR 
MOV RXOBUF. R3 +FOR ERROR MESSAGE 
MOV ee nee + EXPECTED 
MOV » @RXDBUF.R1 ACTUA 
CMP RO.R1 ; COMPARE. EXP vs ACT 


+4 
ERROR ; FRAME ERROR 4 & RX ERROR SHOULD BE SET 
;\F LOWER BYTE DOES NOT MATCH IT 
;PROBABLY 1S A LENGTH SELECT PROBLEM 


3; THIS TEST VERIFYS WORD LENGTH SELECT OF RECEIVER 
;;SECTION . IT USES THE ERROR FLAGS TO DETERMINE 


SEQ 0036 


DZDUS-B MACY11 30(104%6) 


DZ0USB. M11 


005370 
005372 
005400 
005406 


005414 


005422 
0054 30 


0054 36 
005444 


005452 
005460 
005466 
005474 


005502 
005506 
005512 
005516 
005522 
005524 
005526 


005530 
005532 
005540 
005546 


005554 


005562 


31-MAY-77 


000004 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 


042777 
052777 
012767 
012767 


004767 
016703 
012700 
017701 
020001 
001401 
104000 


000004 
052777 
012777 
052777 


012777 


012777 
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000400 
000009 
000400 


064001 


004000 
000020 


020000 
020000 


020000 
020000 
000011 
000252 


011430 
174204 
120125 
174174 


000400 
000000 
000400 


064001 


006000 


174326 
174314 
174312 


174304 
174272 


174254 


174262 
174254 


174246 
174240 
173426 
173776 


174166 
174154 
174152 


174144 


174132 


12 


Ls 
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+; THAT IT WAS SELECTED PROPERLY 
>; FRAME ERROR (FRNERR, RXERR) 

++ MODE: ISOC CISYMOD) 

++ LENGTH: SEVEN 

+-CHAR: 125 


;; SESUANEEAAESERAESEOAESSOAESSANESENESSANSDOOAETSAEESOAES SNES 
"BIS #MRESET. @TXCSR MASTER RESET 
MoV #ISYMOD, APARCSR ; SET THE MODE 
BIS #MRESET. aTXCSR ; MASTER RESET 


;SET MAINT DATA, CLK, BREAK, &MAINTENANCE MODE 
MOV #MTORTA!CLK!MINT!BREAK. @TXCSR 


SET MODE .# OF BITS.PARITY SENSE. &LOAD SYNC REG 
MOV # |SYMOD! SEVEN! NOPAR !0, dPARCSR 
BIS #SYNSCH, ARXCSR ;SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION. .. 
BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK, ATXCSR +POKE CLK UP 
>POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK, ATXCSR +POKE CLK UP 
MOV +b ;# OF SHIFTS 
MOV #252, STM DATA CHAR 
NOTE: THE ABOVE CHARACTER 1S MISSING STOP BIT 
JSR PC, RPOKE +SHIFT IN THIS CHAR 
MOV RXDBUF,R3 FOR ERROR MESSAGE 
MOV #RXERR!FRMERR!125, RO + EXPECTED 
MOV ORXDBUF. R1 > ACTUAL 
CMP RO.R1 ;COMPARE EXP VS ACT 
BEQ . +4 
ERROR ;FRAME ERROR 4 & RX ERROR SHOULD BE SET 
+ 1F LOWER BYTE DOES NOT MATCH IT 
;PROBABLY IS A LENGTH SELECT PROBLEM 


;; THIS TEST VERIFYS WORD LENGTH SELECT OF RECEIVER 
;;SECTION . IT USES THE ERROR FLAGS TO DETERMINE 

3; THAT IT WAS SELECTED PROPERLY 

3; FRAME ERROR (FRMERR. RXERR) 

;;MODE: ISOC CISYMOD) 

>; LENGTH: E |GHT 

7;CHAR: 125 


jj MEXKKAAAAAAA AAA ALAA AAA AAA AAA AAA AAA AAA AAA AAA TT 
TST12: SCOPE 

BIS @MRESET. @TXCSR ;MASTER RESET 

MoV #ISYMOD, @PARCSR >; SET THE MODE 

BIS @MRESET, @TXCSR -;MASTER RESET 


; SET MAINT DATA, CLK. BREAK. BMAINTENANCE MODE 
MOV SMTDATA!CLK! MINT! BREAK, dTXCSR 


;SET MODE .# OF BITS. PARITY SENSE. &LOAD SYNC REG 
MOV # ISYMOD!E IGHT!NOPAR!0, dPARCSR 


SEQ 0037 


a —— Oe eee 


DZDUS-B MACY11 30(1046) 


DZ2DUSB. M11 


005570 


005576 
005604 


005612 
005620 
005626 
005634 


005642 
005646 


005652: 


005656 
005662 
005664 
005666 


005670 
005672 
005700 
005706 


005714 


005722 
005730 


005736 
005744 


052777 


042777 
052777 


042777 
052777 
012767 
012767 


004767 
016703 
012700 
017701 
020001 
001401 
104000 


000004 
052777 
012777 
012777 


052777 


042777 
052777 


020001 
001401 


nh 3 
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000020 


020000 
020000 


020000 
020000 
000012 
000252 


011270 
174044 


120125 
174034 


000400 
000000 
000400 


064001 
001400 


000020 


020000 
020000 


173670 


173664 


174114 


174122 
174114 


174106 
174100 
173266 
173636 


174026 
174014 
174012 


174004 
173772 


173754 


173762 
173754 


173746 
173740 


173116 
173466 


40 
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BIS #SYNSCH, ORXCSR ;SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROI ZATION. . 
BIC #CLK, @TXCSR +POKE CLK DOWN 
BIS #CLK, OTXCSR ;POKE CLK UP 
+POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, @TXCSR +POKE CLK DOWN 
BIS ACLK, OTXCSR +POKE CLK UP 
MOV #10... SHIFT ;*# OF SHIFTS 
MOV #252, STMP1 DATA CHAR 
*;NOTE: THE ABOVE CHARACTER IS MISSING STOP BIT 
JSR PC, RPOKE +SHIFT IN THIS CHAR 
MOV RXDBUF, R3 +FOR ERROR MESSAGE 


MoV #RXERR!FRMERR! 125, RO + EXPECTED 
MOV ORXOBUF. R1 + ACTUAL 
CMP RO.R1 ;COMPARE EXP VS ACT 


. +4 
ERROR ; FRAME ERROR 4 & RX ERROR SHOULD BE SET 
+ \F LOWER BYTE DOES NOT MATCH 


IT 
;PROBABLY 1S A LENGTH SELECT PROBLEM 


;, THIS TEST VERIFYS EVEPAR PARITY SENSE 
;;O0F THE RECEIVER 

;-MODE: ISOC CISYMOD) 

;; PARITY: EVEPAR 

;;> LENGTH: FIVE PLUS PARITY 

++ CHA AR: 25 


PETTtiittittttittttitttitittisttttsttistttsitttstt tsi ts stt tits! 


TST13: SCOPE 
BIS RMRESET.@TXCSR ; MASTER RESET 
MOV #ISYMOD. @PARCSR ;SET THE MODE 
BIS SMRESET.@TXCSR ;MASTER RESET 


;SET MAINT DATA. CLK, BREAK. BMAINTENANCE MODE 
MOV SMTDATA!CLK! MINT! BREAK, dTXCSR 


;SET MODE .# OF BITS.PARITY SENSE.&LOAD SYNC REG 
MOV # ISYMOD!F IVE !EVEPAR !0, @PARCSR 
BIS ®SYNSCH. ARXCSR ;SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION... 
BIC #CLK. @TXCSR +POKE CLK DOWN 
BIS #CLK, @TXCSR ;POKE CLK UP 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, aTXCSR +POKE CLK DOWN 
BIS #CLK, aTXCSR +POKE CLK UP 


MoV RXOBUF.R3 +SET UP FOR ERROR MESSAGE 
MoV #RXERR'PARER! 25, RO + EXPECTED 

Mov #8., SHIFT :# OF SHIFTS 

MOV oy tg DATA CHAR 


;SHIFT In THIS CHAR 

TSTB oRKcSR ;RXDONE ? 

BNI — 

ERROR oe SHOULD BE ASSERTED 
MoV SRXOBUF ‘ > ACTUAL 

CMP RO.R1 a ONPARE EXP VS. ACT 

BEQ _ +4 


SEQ 0038 


—S tsetse nest a 


N 3 
DZDUS-B MACY11 30(1046) 21-SEP-77 09:12 PAGE 41 
DZDUSB. M11 31-MAY-77 09:49 INITIALIZE THE COMMON TAGS SEQ 0039 
1848 006036 104006 ERROR ;PARITY ERROR 4% &BRXERR SHOULD BE SET 
1849 +NOTE THAT THE PARITY BIT SHOULD 
1850 +SHOW UP IN THE DATA 
eae +1E. BIT FIVE FOR FIVE LEVEL CODE 
1853 ++ THIS TEST VERIFYS EVEPAR PARITY SENSE 
1854 ;OF THE RECEIVER 
1855 : MODE: ISOC (CISYMOD) 
1856 ++ PARITY: EVEPAR 
1857 ++ LENGTH: SIX PLUS PARITY 
oon 3; CHAR: 25 
1860 + MXXKXXAAAAAAAAA AAA AAA AAA AAA AAA AAA AA AAA ATA AAA AAA AAA KAKA KEKE 
1861 006040 OoO00004 TST14: SCOPE 
1862 006042 052777 OOO4OO 173656 Bis #MRESET. @TXCSR ;MASTER RESET 
1863 006050 012777 OO00000 173644 MOV #ISYMOD, BPARCSR >; SET THE MODE 
ton 006056 052777 OOO4OO0 173642 BIS @MRESET. @TXCSR ;MASTER RESET 
1866 +SET MAINT DATA, CLK, BREAK, &MAINTENANCE MODE 2 
york 006064 012777 O64001 173634 MO’ #MTDATA'CLK! MINT! BREAK, aTXCSR s 
1869 +SET MODE .#® OF BITS, PARITY SENSE,.&LOAD SYNC REG 
1870 006072 012777 OO3400 172622 MoV #ISYMOD'SIX!EVEPAR'!0, aPARCSR 
1871 006100 052777 000020 173604 BIS @SYNSCH, ARXCSR ;SET SYNC SEARCH ‘ 
1872 +POKE CLK TO GET RECEIVER INTO SYNCROIZATION.... : 
1873 006106 042777 O2C000 173612 BIC #CLK, ATXCSR +POKE CLK DOWN 
1874 006114 052777 O20u00 173604 BIS #CLK, ATXCSR ;POKE CLK UP 
1875 >POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
1876 006122 042777 020000 173576 BIC #CLK, @TXCSR +POKE CLK DOWN 
1877 006130 052777 020000 173570 BIS #CLK, ATXCSR +POKE CLK UP 
1878 006136 016703 173554 MOV RXDBUF,R3 ;SET UP FOR ERROR MESSAGE 
1879 066142 012700 110025 MoV @RXERR'PARER! 25. RO > EXPECTED 
1880 0060146 012767 000011 172746 MoV #9., SHIFT :# OF SHIFTS 
1881 006154 012767 GOO4S2 173316 MOV #452, STMP1 ;DATA CHAR 
1882 006162 004767 010750 JSR PC, RPOKE ;SHIFT IN THIS CHAR 
1883 006166 105777 173520 TST8 “oe ;RXDONE ? 
1884 006172 100401 BM! . 
1885 006174 104004 ERROR + ;RXDONE SHOULD BE ASSERTED 
1886 006176 017701 173514 MoV ORXDBUF,R1 + ACTUAL 
1887 006202 020001 CMP . R1 ;COMPARE EXP VS. ACT 
1888 006204 001401 BEQ 
1889 006206 104000 ERROR PARITY ERROR 4 &RXERR SHOULD BE SET 
1890 . ;NOTE THAT THE PARITY BIT SHOULD 
1891 + SHOW UP IN THE DATA 
1892 ;1€. BIT SIX FOR SIX LEVEL CODE 
1893 
1894 ++ THIS TEST VERIFYS EVEPAR PARITY SENSE 
1895 +7: O0F THE RECEIVER 
1896 ;;MODE: ISOC CISYMOD) 
1897 +: PARITY: EVEPAR 
1898 3; LENGTH: SEVEN PLUS PARITY 
fooe >; CHAR: 325 
190 34 
1901 2 AXXEKAAAA AAA AAA AAA AAA AAA AAA AAA AAA AAAS 
1902 006210 000004 TST15: SCOPE 


1903 006212 052777 000400 173506 BIS #MRESET.@TXCSR ;MASTER RESET 





—=—- 
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DZDUSB. M11 


006220 
006226 


006234 


006242 
006250 


006256 
006264 


006272 
006300 
006306 
006312 
006316 
006324 
006332 
006336 
006342 
006344 
006346 
006352 
006354 
006356 


006360 
006362 
006370 
006376 


006404 
006412 


006420 


006426 
006434 


006442 
006450 


meee NT a cement ‘- *—_ i 


31-MAY-7 
012777 
052777 
012777 
012777 
052777 


042777 
052777 


042777 


104000 


000004 
052777 
012777 
052777 


012777 
012777 


052777 


042777 
052777 


042777 
052777 


000000 
000400 


064001 


005400 
000020 


020000 
020000 


020000 
020000 
173404 
110325 
000012 
001652 
010600 
173350 


173344 


000400 
000000 
000400 


064001 
007400 


000020 


020000 
020000 


020000 
020000 


173474 
173472 


173464 
173452 


173434 


173442 
173434 


173426 
173420 


172576 
173146 


173336 
173324 
173322 


173314 
173302 


173264 


173272 
173264 


173256 
173250 


/ B 4 
42 
INITIALIZE THE COMMON TAGS 


MOV #ISYMOD, APARCSR ; SET THE MODE 
BIS @MRESET.@TXCSR ;MASTER RESET 


+SET MAINT DATA, CLK, BREAK, BMAINTENANCE MODE 
MOV #MTDATA!CLK!MINT! BREAK, aTXCSR 


SET MODE .# OF BITS, PARITY SENSE,&LOAD SYNC REG 
nov #1 SYMOD! SEVEN! EVEPAR !0, @PARCSR 
BIS #SYNSCH, ORXCSR ;SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION.... 
BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK.OTXCSR ~ ;POKE CLK UP 
*+POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK, ATXCSR +POKE CLK UP 


21-SEP-77 09:12 PAGE 
7 09: 49 


MOV RXOBUF,R3 ;SET UP FOR ERROR MESSAGE 
MOV #RXERR'PARER! 325, RO > EXPECTED 

MoV #10. ,. SHIFT ;# OF SHIFTS 

MOV #1652, STMP1 ;DATA CHAR 

JSR PC, RPOKE ;SHIFT IN THIS CHAR 

TSTB @RXCSR ;RXDONE ? 

BNI "ha 

ERROR + RXDONE SHOULD BE ASSERTED 
MOV SRXOBUF. R1 AL 


ACTU 
CMP RO.R1 ; COMPARE. EXP VS. ACT 


+4 
ERRCR ;PARITY ERROR 4 &RXERR SHOULD BE SET 
+NOTE THAT THE PARITY BIT SHOULD 
+SHOW UP IN THE DATA 
+ 1E. BIT SEVEN FOR SEVEN LEVEL CODE 


;; THIS TEST VERIFYS EVEPAR PARITY SENSE 
;;0F THE RECEIVER 

;;MODE: ISOC CISYMOD) 

3; PARITY: EVEPAR 

;; LENGTH: EIGHT PLUS PARITY 

++ CHAR: 125 


Peter tiitttttttttettttttitettttettittttttttttttt ists tet t ts sit tts: 
TST16: SCOPE 

BIS @MRESET.dTXCSR ;MASTER RESET 

MOV #ISYMOD, @PARCSR >; SET THE MODE 

BIS @MRESET. dTXCSR ;MASTER RESET 


; SET MAINT DATA, CLK. BREAK, &MAINTENANCE MODE 
MOV SMTDATA!CLK!MINT!BREAK, dTXCSR 


;SET MODE .# OF BITS. PARITY SENSE.&LOAD SYNC REG 
Nov #1 SYMOD!E IGHT!EVEPAR!0, dPARCSR 
BIS ®SYNSCH, ARXCSR ;SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION... 
BIC #CLK,. ATXCSR ;POKE CLK DOWN 
BIS #CLK, ATXCSR +POKE CLK UP 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, ATXCSR >POKE CLK DOWN 
BIS #CLK, @TXCSR  +POKE CLK UP 


i 


SEQ 0040 


* 


DZDUS-B MACY11 30(1046) 21-SEP-77 O39: 2° PAGE 43 
DZOUSB. M11 31-MAY-77 09:49 INITIALIZE THE COMMON TAGS SEQ 0041 
1960 006456 016703 173234 MOV RXDBUF, RS ;SET UP FOR ERROR MESSAGE 
1961 006462 012700 110125 MoV #RXERR!PARER!125.R0 + EXPECTED 
1962 006466 012767 OOO013 172426 MoV #11. ,SHIFT ;*# OF SHIFTS 
1963 006474 012767 003252 172776 MoV #3252, STHP1 +DATA CHAR 
1964 006502 004767 010420 JSR PC, RPOKE >; SHIFT IN THIS CHAR 
1965 006506 105777 173200 TSTB maT ;RXDONE ? 
1966 006512 100401 BMI ‘ 
1967 006514 104004 ERROR ;RXDONE SHOULD BE ASSERTED 
1968 006516 017701 173174 MOV SRXDBUF Ri +; ACTUAL 
1969 006522 029001 CMP RO, R1 ; COMPARE EXP VS. ACT 
1970 006524 001401 BEQ . +4 
444 | 006526 104000 ERROR ;PARITY ERROR 4 &RXERR SHOULD BE SET 
1973 +2 THIS TEST VERIFYS ODDPAR PARITY SENSE 
1974 ;>OF THE RECEIVER 


2000 006636 012767 009010 172256 MoV #8... SHIFT :# OF SHIFTS 

2001 006644 012767 000352 172626 MoV #352, STMP1 DATA CHAR 

2002 006652 004767 010260 JSR PC, RPOKE + SHIFT IN THIS CHAR 

2003 006656 105777 173030 TSTB @RXCSR ;RXDONE ? 

2004 006662 100401 BMI _ 

2005 006664 104004 ERROR cee SHOULD BE ASSERTED 
2006 006666 017701 173024 MOV 3RxDBUF. R1 *ACTU 

2007 006672 020001 CMP RO.R1 ;COMPARE EXP us ACT 

2008 006674 001401 BEQ . +4 

2009 006676 104000 ERROR ;PARITY ERROR 4% &RXERR SHOULD BE SET 
2010 ;NOTE THAT THE PARITY BIT SHOULD 
2011 . + SHOW UP IN THE DATA 

2012 ;1€. BIT FIVE FOR FIVE LEVEL CODE 
2013 

2014 77 THIS TEST VERIFYS ODDPAR PARITY SENSE 

2015 +;0F THE RECEIVER 





1975 +;MODE: ISOC CISYMOD) 

1976 ;;PARITY: ODDPAR 

1977 >; LENGTH: FIVE PLUS PARITY 

Bak +;CHAR: 65 

1 oo 

1380 Fe S900 05050599 50050000000000000000000000000005900009999009008 899 | 
1981 006530 oco004 TST17: SCOPE 

1982 006532 052777 oOg400 172166 BIS #MRESET, @TXCSR ;MASTER RESET 

1983 006540 012777 OO0000 173154 MOV #ISYMOD, APARCSR > SET THE MODE 

bol 006546 052777 OOO400 173152 BIS #MRESET, @TXCSR ;MASTER RESET 

1 

1986 >; SET MAINT DATA, CLK, BREAK, &BMAINTENANCE MODE 

1987 006554 012777 O684001 173144 MOV #MTDATA!CLK! MINT! BREAK, dTXCSR 

1988 

1989 ;SET MODE .# OF BITS,.PARITY SENSE.&LOAD SYNC REG 

1990 006562 012777 001000 173132 MOV #ISYMOD'F IVE! ODDPAR!0, dPARCSR 

1991 006570 052777 OO00020 173114 BIS RSYNSCH, ARXCSR ;SET SYNC SEARCH 

1992 ;POKE CLK TO GET RECEIVER INTO SYNCROIZATION... 
1993 006576 042777 O20000 173122 BIC #CLK, ATXCSR +POKE CLK DOWN 

1994 006604 052777 O20000 173114 BIS #CLK,. ATXCSR >;POKE CLK UP 

1995 ;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 

1996 006612 042777 020000 173106 BIC #CLK, @TXCSR ;POKE CLK DOWN 

1997 006620 052777 020000 173100 BIS #CLK, ATXCSR ;POKE CLK UP 

1998 006626 016703 173064 MOV RXDBUF,.R3 ;SET UP FOR ERROR MESSAGE 
1999 006632 0127fC 110065 MoV #RXERR 'PARER '65, RO > EXPECTED 
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006700 
006702 
006710 
006716 


006724 


006732 
006740 


006746 
006754 


006762 
006770 
006776 
007002 
007006 
007014 
007022 
007026 
007032 
007034 
007036 
007042 
007044 
007046 


007050 
007052 
007060 
007066 


007074 


31-MAY-77 


000004 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 


042777 
052777 
016703 
012700 
012767 
012767 
004767 
105777 
100401 
104004 
017701 
020001 
001401 
104000 


000004 
052777 
012777 
052777 


012777 


09: 4 


000400 
600000 
000409 


064001 


003000 
000020 


020000 
020000 


020000 
020000 
172714 
110125 
000011 
000052 
010110 
172660 


172654 


000400 
000000 
000400 


064001 


Pea 09: 


173016 
173004 
173002 


172774 
172762 


172744 


172752 
172744 


172736 
172730 


172106 
172456 


172646 
172634 
172632 


172624 


12 


0 4 
PAGE 4 
INITIALIZE THE COMMON TAGS 


++ MODE: ISOC CISYMOD) 
;;PARITY: ODDPAR 

+; LENGTH: SIX PLUS PARITY 
>; CHAR: 125 


jj AXXXAAAAAAAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA ES 
TST20: SCOPE 

BIS MMRESET,@TXCSR ; MASTER RESET 

MOV #ISYMOD. OPARCSR ;SET THE MODE 

BIS MMRESET,@TXCSR ;MASTER RESET 


;SET MAINT DATA, CLK, BREAK, &MAINTENANCE MODE 
MOV #MTOATAICLK! MINT! BREAK, aTXCSR 


+ SET a ,# OF BITS,PARITY SENSE. &LOAD SYNC REG 
nov #1SYMOD!S1X!ODDPAR !0, @PARCSR 
BIS #SYNSCH, ARXCSR + SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION. .. 
BIC #CLK, ATXCSR *POKE CLK DOWN 
BIS #CLK. ATXCSR +POKE CLK UP 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, @TXCSR *POKE CLK DOWN 
BiS #CLK, ATXCSR +POKE CLK UP 


MOV RXDBUF,R3 ;SET UP FOR ERROR MESSAGE 
MoV #RXERR'PARER!125.R0 + EXPECTED 

MOV #9. , SHIFT ;# OF SHIFTS 

MOV #652, STMP1 ;DATA CHAR 

JSR PC, RPOKE ;SHIFT IN THIS CHAR 

TSTB ARXCSR ;RXDONE ? 

BNI he 

ERROR ee en SHOULD BE ASSERTED 


Mov IRXOBUF. Ri ACTUA 
CMP RO,R1 ; COMPARE. EXP us ACT 


B +4 

ERROR :PARITY ERROP 4% &RXERR SHOULD BE SET 
;NOTE THAT THE PARITY BIT SHOULD 
+SHOW UP IN THE DATA 

;1E. BIT SIX FOR SIX LEVEL CODE 


3; THIS TEST VERIFYS ODDPAR PARITY SENSE 
;;OF THE RECEIVER 

>; MODE: ISOC CISYMOD) 

;; PARITY: ODDPAR 

;; LENGTH: SEVEN PLUS PARITY 

>;CHAR: 125 


5 RARAAAAAAAA AAA ARTA AAA AAA AAA AAA AAA AAA AAA AAA TAKA AA AES 
TST21: SCOPE 

BIS @MRESET, @TXCSR ;MASTER RESET 

MoV #ISYMOD. @PARCSR ;SET THE MODE 

BIS #MRESET, @TXCSR -; MASTER RESET 


;SET MAINT DATA, CLK, BREAK, SMAINTENANCE MODE 
Mov SMTDOATAICLK! MINT! BREAK, aTXCSR 


;SET MODE .# OF BITS. PARITY SENSE.&LOAD SYNC REG 
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007102 
007110 


007116 
007124 


007132 
007140 
007146 
007152 
007156 
007164 
007172 
007176 
007202 
007204 
007206 
007212 
007214 
007216 


007220 
007222 
007230 
007236 


007244 


007252 
007260 


007266 
007274 


007302 
007310 
007316 
007322 
007326 
007334 
007342 
007346 
007352 


21-SEP-77 09:12 PAGE 45 


31-MAY-77 09: 49 


012777 
052777 


042777 
052777 


042777 
052777 
016703 
012700 
012767 
012767 
004767 
105777 
100401 
104004 
017701 
020001 
001401 
104000 


000004 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 


042777 


100401 


005000 
000020 


020000 
020000 


020000 
020000 
172544 
110125 
000012 
001252 
007740 
172510 


172504 


000400 
000000 
000400 


064001 


007000 
000020 


020000 
020000 


020000 
020000 
172374 
110125 
000013 
002252 


007570 
172340 


172612 
172574 


172602 
172574 


172566 
172560 


171736 
172306 


172476 
172464 
172462 


172454 
172442 


172424 


172432 
172424 


172416 
172410 


171566 
172136 


—E 4 


INITIALIZE THE COMMON TAGS 


MOV # 1SYMOD! SEVEN! ODDPAR !0, APARCSR 
BIS #SYNSCH. ORXCSR ; SET SYNC SEARCH 
*POKE CLK TO GET RECEIVER INTO ag nar opat 
BIC #CLK, OTXCSR +POKE CLK DOWN 
#CLK, @TXCSR ;POKE CLK UP 


BIS 
+ POKE “ = GET LOGIC INTO SYNCRONIZATION 


#CLK, aTXCSR + POKE = DOWN 


BIS #CLK. TXCSR +POKE CLK UP 
MoV RXDBUF. R3 +SET UP FOR ERROR MESSAGE 
MOV coe ye lt ade nag + EXPECTED 
MoV #10. ,SHI +# OF SHIFTS 
MoV #1252, STHPA +DATA CHAR 
JSR PC, RPOKE +SHIFT IN THIS CHAR 
ae no ig + RXDONE ? 
| ‘ 
ERROR any SHOULD BE ASSERTED 
MOV JRXDBUF. R1 AL 


ACTU 
CMP . R1 ; COMPARE. EXP VS. ACT 


ERROR ; PARITY ERROR 4% &RXERR SHOULD BE SET 
+NOTE THAT THE got BIT SHOULD 
+SHOW UP IN THE DAT 
+ 1€. BIT SEVEN FOR SEVEN LEVEL CODE 


++ THIS TEST VERIFYS ODDPAR PARITY SENSE 
+;OF THE RECEIVER 

+,MODE: ISOC CISYMOD) 

+; PARITY: ODDPAR 

++LENGTH: EIGHT PLUS PARITY 

++ CHAR: 125 


PETTITT TTT ttt ttt tit ttt ttt ttt titi ttt itt titi ttt ttt ttt t tts) 


BIS @MRESET. aTXCSR ;MASTER RESET 
MOV #ISYMOD, @PARCSR >; SET THE MODE 
BIS #MRESET. @TXCSR ; MASTER RESET 


;SET ome DATA, CLK. BREAK, &MAINTENANCE MODE 
MOV 


#MTDATA'CLK! MINT! BREAK, @TXCSR 


:SET MODE .# OF BITS. PARITY SENSE.&LCAD SYNC REG 
MoV 


#1 SYMOD'E IGHT! ODDPAR !0. aPARCSR 
BIS ®SYNSCH, @RXCSR + SET SYNC SEARCH 
;POKE CLK TO GET RECE'VER INTO SYNCROI ZATION. 
BIC #CLK. @TXCSR +POKE CLK DOWN 

#CLK, @TXCSR +POKE CLK UP 


BIS 
+ POKE ? yy GET LOGIC INTO SYNCRONIZATION 


#CLK. @TXCSR ;POKE CLK DOWN 
BIS #CLK. aTXCSR +POKE CLK UP 


MoV RXOBUF,.R3 ;SET UP FOR ERROR MESSAGE 
MoV @RXERR'PARER'125, RO +» EXPECTED 

MoV #11... SHIFT ;@ OF SHIFTS 

MOV #2252. STHP1 ;DATA CHAR 

JSR PC, RPOKE ; SHIFT IN THIS CHAR 

TSTB @RXCSR ;RXDONE 7? 

BNI _ +4 


SEQ 0043 


- 
DZDUS-B MACY11 30(1046) 21-SEP-77 09:12 PAGE 4 


2182 ; PARITY: ODDPAR 


DZDUSB. M11 31-MAY-77 09:49 ht THE COMMON TAGS SEQ 0044 
2128 007354 104004 ERROR + RXDONE SHOULD BE ASSERTED 
2129 007356 017701 172334 MOV anxoouF oR ACTUAL 
2130 007362 020001 CMP RO, R1 COMPARE’ EXP VS. ACT 
2131 007364 001401 BEQ ay 
sts 007366 104000 ERROR ;PARITY ERROR 4% &RXERR SHOULD BE SET 
2134 +; THIS TEST PERFORMS BINARY DATA CHECK ON THE 
2135 >; RECEIVER 
2136 >}; LENGTH: EIGHT PLUS PARITY 
2137 ;+MODE: ISYMOD 
age: +; PARITY: EVEPAR 
2140 3 RAKKKKAAAA AKA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA KEK 
2141 007370 O00004 TST2Z3: SCOPE 
2142 007372 052777 OOO400 172326 BIS @MRESET. @TXCSR -;MASTER RESET 
2143 007400 012777 OOOO0O 172314 MOV #1SYMOD, OPARCSR ; SET THE MODE 
hae 007406 052777 OOO4XOO 172312 BIS #MRESET, @TXCSR ;MASTER RESET 
2146 ;SET MAINT DATA, CLK. BREAK, BMAINTENANCE MODE 
007414 012777 O684001 172304 MoV #MTDATA!CLK' MINT! BREAK, aTXCSR 
2149 ;SET MODE .# OF BITS.PARITY SENSE, &LOAD SYNC REG 
2150 007422 012777 007400 172272 Mov #ISYMOD!'E IGHT'EVEPAR!0, dPARCSR 
2151 007430 052777 000020 172254 BIS . #SYNSCH.@RXCSR ;SET SYNC SEARCH 
2152 ;POKE CLK TO GET RECEIVER INTO SYNCROIZATION... 
2153 007436 042777 O2C000 172262 BIC #CLK, ATXCSR ;POKE CLK DOWN 
2154 007444 052777 O20U00 172254 BIS #CLK, ATXCSR ;POKE CLK UP 
2155 ;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
2156 007452 042777 O20000 172246 BIC #CLK, ATXCSR ; POKE mee DOWN 
2157 007460 052777 O20000 172240 BIS #CLK, ATXCSR ;POKE CLK UP 
2158 007466 016703 172224 MOV RXOBUF, R3 ;SET UP ERROR MESSAGE 
2159 007472 005004 CLR By ;DATA CHAR 
2160 007474 010400 1: MOV R4,RO ;EXPECTED 
2161 007476 012767 OO0013 171416 MoV #11. SHIFT +# OF SHIFTS 
2162 007504 010467 171770 MoV R4, STMP1 ;"TO BE SHIFTED CHARACTER” 
2163 007510 004767 007574 JSR PC, EVENS ; CALC PARITY 
2164 007514 000241 CLC 
2165 007516 006167 171756 ROL STMP1 >;GENERATE START BIT 
2166 0C7522 052767 002000 171750 BIS #B1T10, STMP1 ;GENERATE STOP BIT 
2167 ;STMP1 NOW HAS CHARACTER TO BE POKED INTO RECEIVER 
2168 007530 004767 007402 JSR PC, RPOKE ; SHIFT IN THIS CHAR 
2169 007534 017701 172156 MOV OR XDBUF. R1 ; ACTUAL 
2170 007540 020091 CMP RO, R1 ; COMPARE EXP VS ACT 
2171 007542 001401 BEQ +4 
2172 007544 104002 ERROR 2 ;DATA CHARS SHOULD MATCH 
2173 ; THERE SHOULD BE NO PARITY ERROR 
2174 007546 005204 INC Ry ; UPGRADE NEXT CHAR 
21756 007550 105704 TSTB RY ;LAST CHAR ? 
tp 007552 001350 BNE 1$ 

1 
2178 7; THIS TEST PERFORMS BINARY DATA CHECK ON THE 
2179 ;,RECEIVER 
2180 ;; LENGTH: EIGHT PLUS PARITY 
2181 ;; MODE: ISYMOD 
2183 is ce 
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007554 
007556 
007564 
007572 


C07600 


007606 
007614 


007622 
007630 


007636 
007644 
007652 
007656 
007660 
007662 
007670 
007674 
007700 
007702 
007706 


007714 
007720 
007724 
007726 
007730 


007732 
007734 
007736 


007740 
007742 
007750 
007756 


007764 


007772 
010000 


31-MAY-77 


000004 
052777 
012777 
052777 


01277? 


012777 
052777 


042777 
052777 


042777 
052777 
016703 
005004 
010400 
012767 
010467 
004767 
000241 
006167 
052767 


004767 
017701 
020001 
001401 
104002 


005204 
105704 
001350 


000004 
052777 
012777 
052777 


012777 


012777 
052777 


21-SEP-77 09: 


09: 49 


000400 
000000 
000400 


064001 


007000 
000020 


020000 
020000 


020000 
020000 
172040 


000013 
171604 
007324 


171572 
002u00 


007216 
171772 


000400 
020000 
000400 


064001 


027400 
000020 


172142 
172130 
172126 


172120 


172106 
172070 


172076 
172070 


172062 
172054 


171232 


171564 


171756 
171744 
171742 


171734 


171722 
171704 


G 4 
12 PAGE 4 
INITIALIZE THE COMMON TAGS 


7 wang 7+ plot yma apeapienpenapanaaymaaere tin cometrico tie AON 


TST24: 
BIS #MRESET.@TXCSR ; MASTER RESET 
MOV #ISYMOD, @PARCSR ;SET THE MODE 
BIS RWMRESET,@TXCSR ;MASTER RESET 


;SET MAINT DATA, CLK. BREAK, &MAINTENANCE MODE 
MOV #MTDATA!CLK!MINT! BREAK, ATXCSR 


;SET MODE .# OF BITS.PARITY SENSE, &LOAD SYNC REG 
MOV # |SYMOD!E IGHT! ODDPAR !0, @PARCSR 
BIS #SYNSCH, ARXCSR ;SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION. .. 
BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK. ATXCSR ;POKE CLK UP 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, dTXCSR + POKE a DOWN 


BIS #CLK,. ATXCSR *POKE CLK UP 
MOV RXDBUF,.R3 ;SET UP ERROR MESSAGE 
CLR RY ;DATA CHAR 
1$: MOV R4Y,RO ;EXPECTED 
MOV #11. tage +f OF SHIFTS 
MOV R4, STM ;"TO BE SHIFTED CHARACTER” 
oa PC, O08 ;CALC PARITY 
L 


ROL STMP1 ;GENERATE START BIT 
BIS #81710, STMP1 GENERATE STOP BIT 
:STMP1 NOW HAS CHARACTER TO BE POKED INTO RECEIVER 
JSR PC, RPOKE +SHIFT IN THIS CHAR 
MOV ORXOBUF. R1 > ACTUAL 
CMP RO.R1 ;COMPARE EXP VS ACT 


BEQ . +4 
ERROR 2 ;DATA CHARS SHOULD MATCH 
; THERE SHOULD BE NO PARITY ERROR 
INC RY ; UPGRADE NEXT CHAR 
TSTB RY ;LAST CHAR ? 
BNE 1$ 
3; THIS TEST PERFORMS BINARY DATA CHECK ON THE 
> -RECEIVER 


>; LENGTH: EIGHT PLUS PARITY 
;; MODE: SYNEXT 
7; PARITY: EVEPAR 


5p MERKAAAAAAAAA AAA AAA AAA AAA AE AAA AAA AAA AAA 
TST25: SCOPE . 

BIS RIRESET.@TXCSR ;MASTER RESET 

MoV #SYNEXT, @PARCSR ; SET THE MODE 

BIS @MRESET. @TXCSR ;MASTER RESET 


;SET MAINT DATA, CLK, BREAK, BMAINTENANCE MODE 
MOV @MTDATA!CLK! MINT! BREAK, dTXCSR 


> SET ome * Ay OF BITS,PARITY SENSE.&LOAD SYNC REG 
SSYNEXT!'E IGHT!EVEPAR!0, dPARCSR 
BIS RSYNSCH, ARXCSR ;SET SEARCH SYNC 


—————-- ———_ -- —- - +} 


SEQ 0045 


DZDUS-B MACY11 3011046) 


DZ0USB. M11 


2240 
2241 
2242 


2243 


010006 
010014 
010022 
010026 
010030 
010032 
010040 
010044 


010050 
010054 
010060 
010062 
010064 


010066 
0109070 
010072 


010074 
010076 
010104 
010112 


010120 


010126 
010134 


010142 
010150 
010156 
010162 
010164 
010166 
010174 
010200 


010204 
010210 
010214 
010216 
010220 


010222 
010224 


31-MAY-7 


042777 
052777 
016703 
005004 
010400 
012767 
010467 
004767 


004767 
017701 
02C001 
001401 
104002 


005204 
105704 
001356 


000004 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 
016703 
005004 
010400 
012767 
010467 
004767 


004767 
017701 
020001 
001401 
104002 


005204 
105704 


020000 
020000 
171670 


000011 
171434 
007240 


007062 
171636 


000400 
020000 
000400 


064001 


027000 
000020 


020000 
020000 
171534 


000011 
171300 
007020 


006726 
171502 


H 4 
48 
INITIALIZE THE COMMON TAGS 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 


21-SEP-77 O09: " PAGE 
7 09:49 


171712 BIC #CLK, ATXCSR + POKE a es 
171704 BIS #CLK, aTXCSR +POKE CLK 
MOV RXOBUF.R3 ;SET UP ERROR MESSAGE 
CLR R4 ;DATA CHAR 
1$: MOV R4,.RO ;EXPECTED 
171062 MOV #9.,SHIFT ;# OF SHIFTS 
MoV R4, STMP1 "TO BE SHIFTED CHARACTER" 


JSR PC, EVENS CALC PARITY 

;STMP1 NOW HAS CHARACTER TO BE POKED INTO RECEIVER 
JSR PC, RPOKE Ie IN THIS CHAR 
MoV ORXOBUF, R1 


sACTU 
CMP RO.R1 ;COMPARE EXP us ACT 


BEQ +4 
ERROR 2 ;DATA CHARS SHOULD MATCH 
; THERE SHOULD BE NO PARITY ERROR 
INC RY ; UPGRADE NEXT CHAR 
TSTB RY ;LAST CHAR ? 
BNE 1$ 
;, THIS TEST PERFORMS BINARY DATA CHECK ON THE 
>; RECEIVER 


;+LENGTH: EIGHT PLUS PARITY 
> MODE: SYNEXT 
+ PARITY: ODDPAR 


PETTITT TTT iit t ttt itt ttt test ett ttt itt te tt tits iets t ttt ttt tts 
TST26: SCOPE 


171622 BIS #MRESET,@TXCSR -;MASTER RESET 
171610 MOV #SYNEXT, @PARCSR >; SET THE MODE 
171606 BIS RMRESET.@TXCSR ;MASTER RESET 
;SET MAINT DATA, CLK. BREAK, &MAINTENANCE MODE 
171600 MOV SMTDATA!CLK! MINT! BREAK. dTXCSR 
;SET MODE .# OF BITS,PARITY SENSE.&LOAD SYNC REG 
171566 MOV #SYNEXT!E1GHT! ODDPAR !0. aPARCSR 
171550 BIS @SYNSCH, ARXCSR ;>SET SEARCH SYNC 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
171556 BIC #CLK, ATXCSR + POKE _ DOWN 
171550 BIS #CLK, @TXCSR ;POKE CLK UP 
MOV RXOBUF.R3 SET UP ERROR MESSAGE 
CLR R4 DATA CHAR 
1$: MoV R4Y,RO ;EXPECTED 
170726 MOV #9., SHIFT +# OF SHIFTS 
MOV R4, STMP1 ;"TO BE SHIFTED CHARACTER” 
JSR Pc, ODD8 ;CALC PARITY 
;$TMP1 NOW HAS CHARACTER TO BE POKED INTO RECEIVER 
JSR PC, RPOKE ;SHIFT !N THIS CHAR 
MoV OR XOBUF. R1 + ACTUAL 
CMP RO.R1 ;COMPARE EXP VS ACT 
BEQ +4 
ERROR 2 DATA CHARS SHOULD MATCH 
; THERE SHOULD BE NO PARITY ERROR 
INC R4 ; UPGRADE NEXT CHAR 
TSTB R4 LAST CHAR ? 


SEQ 0046 


Z 


1 4 
DZDUS-B MACY11 30(1046) 21-SEP-77 09:12 PAGE 49 


DZDUSB. M11 31-NAY-77 09:49 INITIALIZE THE COMMON TAGS SEQ 0047 
ease 010226 001356 BNE 1$ 
2298 +; THIS TEST CHECKS THE STRIP SYNC FUNCTION 
2299 ;+OF THE RECEIVER LOGIC 
2300 ;; MODE: ISYMOD 
2301 3; LENGTH: FIVE 
2302 ;;NOTE: RXDONE SHOULD NEVER ASSERT 
a ++ CHAR: 26 (SYNC) 
2305 5p MXKXKAAAAAAA AAA AAA AAA AA AAA AAA AAA AAA AAA AAA AAA AAA AAAS 
2306 010230 000004 TST27: SCOPE 
2307 010232 052777 OOO40O0 171466 BIS #MRESET.@TXCSR ;MASTER RESET 
2308 010240 012777 OOOO00 171454 MOV #ISYMOD, APARCSR ;SET THE MODE 
tr 010246 052777 OOO4OO 171452 BIS #MRESET. @TXCSR ;MASTER RESET 
2311 ;SET MAINT DATA, CLK, BREAK, &MAINTENANCE MODE 
ot 010254 012777 O684001 171444 MOV @MTDATAICLK! MINT! BREAK, aTXCSR 
2314 ;SET MODE .# OF BITS. PARITY SENSE. &LOAD SYNC REG 
2315 010262 012777 000026 171432 now #ISYMOD!F IVE 'NOPAR ! 26. dPARCSR 
2316 010270 082777 OO0020 171414 BiS @SYNSCH. ARXCSR ;SET SYNC SEARCH 
2317 ;POKE CLK TO GET RECEIVER INTO SYNCROIZATION... 
2318 010276 042777 O20000 171422 BIC #CLK, ATXCSR ;POKE CLK DOWN 
2319 010304 052777 OZO000 171414 BIS #CLK, ATXCSR ;POKE CLK UP 
2320 ;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
2321 010312 042777 O2C000 171406 BIC #CLK, ATXCSR ;POKE CLK DOWN 
2322 010320 052777 O20U00 171400 BIS #CLK, ATXCSR ;POKE CLK UP 
2323 010326 052777 OOO4OO 171356 BIS @STPSYN. ARXCSR ;SET STRIP SYNC 
2324 010334 012767 OO0003 170562 MoV #3, COUNT ;# OF SYNC CHARS 
2325 010342 012767 000154 171130 15%: MOV #154, STMP1 ; CHAR TO BE SHIFTED 
2326 010350 012767 000007 170544 MOV #7, SHIFT ;# OF SHIFTS 
2327 010356 004767 006554 JSR PC, RPOKE ;SHIFT IN THIS CHAR 
2328 010362 105777 171324 TSTB @RXCSR ;RXDONE 7? 
2329 010366 100001 BPL +4 
2330 010370 104004 ERROR 4 ;RXDONE SHOULD NOT BE ASSERTED 
2331 010372 005367 170526 DEC COUNT ;# OF SYNC CHARS 
is 010376 001361 BNE 1$ 
2334 3; 7HIS TEST CHECKS THE STRIP SYNC FUNCTION 
2335 3;0F THE RECEIVER LOGIC 
2336 ;; MODE: ISYMOD 
2337 ;; LENGTH: SIX 
2338 ;;NOTE: RXDONE SHOULD NEVER ASSERT 
ite >; CHAR: 26 (SYNC) 
234 Mg 
2341 5 AAEM OEAAA ERA AAA AAA AAA AAA 
2342 010400 000004 TST30: SCOPE 
2343 010402 052777 OOO4O0 171316 BIS @MRESET. @TXCSR ;MASTER RESET 
2344 010410 012777 OOOO00 171304 Mov #ISYMOD, @PARCSR > SET THE MODE 
2345 010416 052777 OO00400 171302 BIS @MRESET. @TXCSR ;MASTER RESET 
2346 
2347 ,SET MAINT DATA. CLK, BREAK, &BMAINTENANCE MODE 
2348 010424 012777 O684001 171274 MOV #MTDATA'CLK'!MINT' BREAK, dTXCSR 
2349 
2350 ;SET MODE .® OF BITS.PARITY SENSE.&LOAD SYNC REG 


2351 010432 012777 002026 171262 MOV # |ISYMOD!S1X!NOPAR ! 26. OPARCSR 





DZDUS-B MACY11 3011046) 
D2DUSB. M11 


010440 


010446 
010454 


010462 
010470 
010476 
010504 
010512 
0:0520 
010526 
010532 
010536 
010540 
010542 
010546 


052777 


042777 
052777 


042777 
052777 
052777 
012767 
012767 
012767 
004767 
106777 
100001 
104004 
005367 
001361 


010550 
010552 
010560 
010566 


000004 
052777 
012777 
052777 


010574 012777 


010602 
010610 


010616 
010624 


010632 
010640 
010646 
010654 
010662 
010670 
010676 
010702 
010706 
010710 
010712 
010716 


012777 
052777 


042777 
052777 


042777 


001361 


31-MAY-77 


21-SEP-77 09: 


09: 49 
od0020 


020000 
020000 


020000 
020000 
000400 
000003 
000254 
000010 
006404 
171154 


170356 


000400 
000000 
000400 


064001 


004026 
000020 


020000 
020000 


020000 
020000 
000400 
000003 
000454 
000011 
006234 
171004 


170206 


171244 


171252 
171244 


171236 
171230 
171206 
170412 
170760 
170374 


171146 
171134 
171132 


171124 


171112 
171074 


171102 
171074 


171066 
171060 
171036 
170242 
170610 
170224 


J 4 
2 PAGE 50 
INITIALIZE THE COMMON TAGS 


BIS WSYNSCH, ORXCSR ; SET SYNC SEARCH 

;POKE CLK TO GET RECEIVER INTO og eho, 

BIC #CLK. dTXCSR +POKE CLK DOWN 

BIS #CLK. OTXCSR +POKE CLK UP 
+ POKE “7 GET LOGIC a vonergen oo ae big 
L 


LK, ;POKE CLK DOWN 

BIS #CLK, aTXCSR ;POKE CLK UP 

BIS @STPSYN, ARXCSR ;SET STRIP SYNC 

MoV #3, COUNT ;# OF SYNC CHARS 
15: MOV #254, STMP1 > CHAR TO BE SHIFTED 

MoV #8. , SHIFT ;# OF SHIFTS 

JSR PC, RPOKE ;SHIFT IN THIS CHAR 

TSTB @RXCSR ;RXDONE 7? 

BPL +4 

ERROR 4 ;RXDONE SHOULD NOT BE ASSERTED 

~ —— ;# OF SYNC CHARS 

1 


++ THIS TEST CHECKS THE STRIP SYNC FUNCTION 
+7OF THE RECEIVER LOGIC 

++ MODE: ISYMOD 

+; LENGTH: SEVEN 

++NOTE: RXDONE SHOULD NEVER ASSERT 

*++CHAR: 26 (SYNC) 


PETiitettttttiitttttttttttttttttttttttttttttttttttttisttt tt sti tt 
TST31: SCOPE 


BIS RMRESET.@TXCSR ;MASTER RESET 
MoV #ISYMOD, @PARCSR ;SET THE MODE 
BIS #MRESET. @TXCSR ;MASTER RESET 


;SET MAINT DATA, CLK, BREAK, &MAINTENANCE MODE 
MOV a#MTDATA!CLK! MINT! BREAK, @TXCSR 


;SET MODE .# OF BITS. PARITY SENSE.&LOAD SYNC REG 
Mov # |SYMOD! SEVEN! NOPAR ! 26, dPARCSR 

BIS WSYNSCH. ARXCSR ;SET SYNC SEARCH 

;POKE CLK TO GET RECEIVER INTO SYNCROIZATION. .. 

BIC #CLK, ATXCSR +POKE CLK DOWN 

BIS #CLK, @TXCSR +POKE CLK UP 
‘POKE CLK TO GET LOGIC INTO SYNCRONIZATION 

BIC #CLK,. ATXCSR +POKE CLK DOWN 


BIS #CLK, aTXCSR ;POKE CLK UP 

BIS @STPSYN. ARXCSR ;SET STRIP SYNC 

MOV #3, COUNT 7# OF SYNC CHARS 
1$: MOV #454, STMNP1 ;CHAR TO BE SHIFTED 

MoV #3... SHIFT ;# OF SHIFTS 

JSR PC, RPOKE ; SHIFT IN THIS CHAR 

TSTB ORXCSR ;RXDONE ? 

BPL . +4 

ERROR 4 ;RXDONE SHOULD NOT BE ASSERTED 

DEC — ;# OF SYNC CHARS 

BNE j 


;; THIS TEST CHECKS THE STRIP SYNC FUNCTION 
+/0F THE RECEIVER LOGIC 


SEQ 0048 


DZ0US-B MACY11 30(104%6) 


DZ2DUSB. M11 


2408 
2409 
2410 
2411 
2412 
2413 
2414 
2415 
2416 
2417 
2418 
2419 
2420 
2421 
2422 
2423 
2424 
2425 
2426 
2427 


010720 
010722 
010730 
010736 


010744 


010752 
010760 


010766 
010774 


011002 
011010 
011016 
011024 
011032 
011040 
011046 
011052 
011056 
011060 
011062 
011066 


011070 
011072 
011100 
011106 


011114 


011122 
011130 


011136 
011144 


31-MAY-77 


000004 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 


042777 
052777 
052777 
012767 
012767 
012767 
004767 
105777 
100001 
104004 
005367 
001361 


000094 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 


21-SEP-77 09: 


09: 49 


000400 
000000 
000409 


064001 


006026 
000020 


020000 
020000 


020000 
020000 
000400 
000003 
001054 
000uU12 
006064 
170634 


170036 


000400 
020000 
000400 


064001 


020026 
000020 


020000 
020000 


170776 
170764 
170762 


170754 


170742 
170724 


170732 
170724 


170716 
170710 
170666 
170072 
170440 
170054 


170626 
170614 
170612 


170604 


170572 
170554 


170562 
170554 


K 4 
INITIALIZE THE COMMON TAGS 


++ MODE: ISYMOD 

>; LENGTH: EIGHT 

+;NOTE: RXDONE SHOULD NEVER ASSERT 
7+ CHAR: 26 (SYNC) 


j; SESMESEAASSSUNESNESSUESSUSSSSESSNS0500 200000000 0500200020000 
"BIS MMRESET, aTXCSR MASTER RESET 
MOV #ISYMOD, @PARCSR ;SET THE MODE 
BIS @MRESET, aTXCSR ;MASTER RESET 


;SET MAINT DATA. CLK, BREAK, &MAINTENANCE MODE 
Mov #MTOATA!CLK! MINT! BREAK, dTXCSR 


;SET MODE .# OF BITS,PARITY SENSE.&LOAD SYNC REG 
MOV # 1SYMOD!E IGHT! NOPAR ! 26, @PARCSR 
BIS #SYNSCH, ARXCSR ;SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION. .. 
BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK, ATXCSR +POKE CLK L 
+POKE CLK TO GET LOGIC INTO SYNCRONIZATION. 
BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK, ATXCSR +POKE CLK UP 
BIS RSTPSYN, ARXCSR ;SET STRIP SYNC 
MOV ... , #3, COUNT ;# OF SYNC CHARS 
1$: MOV - #1054, STMP1 CHAR TO BE SHIFTED 
MOV . #10.,SHIFT +# OF SHIFTS 
JSR. PC, RPOKE + SHIFT IN THIS CHAR 
TSTB O@RXCSR ;RXDONE ? 
+4 


OPL 

ERROR’ 4° *+RXDONE SHOULD NOT BE ASSERTED 
oe | eats ;# OF SYNC CHARS 

N 1% «, 


3; THIS TEST CHECKS THE STRIP SYNC FUNCTION 
;,0F THE RECEIVER LOGIC 

+; MODE: SYNEXT 

>> LENGTH: FIVE 

;;NOTE: RXDONE SHOULD NEVER ASSERT 

>;CHAR: 26 (SYNC) 


5 5 AAXKKAAAAA AAA AAA AAA AAA AAA AAA AAA AAA AA AAA AAA AAA AAA AAS 
TST33: SCOPE 

BIS RMRESET.@TXCSR -;MASTER RESET 

MoV SSYNEXT, @PARCSR ; SET THE MODE 

BIS @MRESET,@TXCSR MASTER RESET 


;SET MAINT DATA, CLK, BREAK, B&MAINTENANCE MODE 
MOV #MTOATA!CLK! MINT! BREAK. dTXCSR 


;SET MODE .# OF BITS. PARITY SENSE.&LOAD SYNC REG 
MOV #SYNEXT!F IVE 'NOPAR ! 26, OPARCSR 
BIS SSYNSCH. ARXCSR ;SET SEARCH SYNC 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK. ATXCSR +POKE CLK DOWN 
BIS #CLK. ATXCSR +POKE CLK UP 


12 PAGE 51 


SEQ 0049 


DZDUS-B MACY11 wd te 3 


DZDUSB. M11 


011152 
011160 
011166 
011174 
011202 
011206 
011212 
011214 
011216 
011222 


011224 
011226 
011234 
011242 


011250 


011256 
011264 


011272 
011300 
011306 
011314 
011322 
011330 
011336 
011342 
011346 
011350 
011352 
011356 


011360 
011362 
011370 
011376 


31-MA 


052777 
012767 
012767 
012767 
004767 
105777 
100001 
104004 
005367 
001361 


000004 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 
052777 
012767 
012767 
012767 
004767 
105777 
100001 
104004 
005367 
001361 


000004 
052777 
012777 


‘052777 


21-SEP-77 09: 
09: 49 


000400 
000003 
000026 
000005 
005730 
170500 


167702 


000400 
020000 
000400 


064001 


022026 
000020 


020000 
020000 
000400 
000003 
000026 
000006 
005574 
170344 


167546 


000400 
020000 
000400 


170532 
167736 
170304 
167720 


170472 
170460 
170456 


170450 


170436 
170420 


170426 
170420 
170376 
167602 
170150 
167564 


170336 
170324 
170322 


‘ § 
12 PAGE 52 
INITIALIZE THE COMMON TAGS 


BIS @STPSYN, ARXCSR ;SET STRIP SYNC 


MOV #3, COUNT ;# OF SYNC CHARS 

1$: MOV #26, STMP1 CHAR TO BE SHIFTED 
MoV #5, SHIFT + OF SHIFTS 
JSR PC, RPOKE + SHIFT IN THIS CHAR 
i ope +RXDONE ? 
ERROR ¥ +RXDONE SHOULD NOT BE ASSERTED 
oe eng ;# OF SYNC CHARS 


+; THIS TEST CHECKS THE STRIP SYNC FUNCTION 
>; OF THE RECEIVER LOGIC 

>, MODE: SYNEXT 

+> LENGTH: SIX 

+;NOTE: RXDONE SHOULD NEVER ASSERT 

++CHAR: 26 (SYNC) 


Mettttttitiitttttttttttitttttttttttttttsttt ttt tttt ttt ttt titi tts 
SCOPE 


TST34: 
BiS #MRESET.@TXCSR ;MASTER RESET 
MOV #SYNEXT, APARCSR ; SET THE MODE 
BIS #MRESET. @TXCSR ;MASTER RESET 


;SET MAINT DATA, CLK, BREAK, &MAINTENANCE MODE 
MOV #MTDATA!CLK! MINT! BREAK, aTXCSR 


;SET MODE .# OF BITS.PARITY SENSE.&LOAD SYNC REG 
MOV #SYNEXT!S1X!NOPAR ! 26, APARCSR 
BIS #SYNSCH, @RXCSR ;SET SEARCH SYNC 
>POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, ATXCSP +POKE CLK DOWN 
BIS #CLK, ATXCSR ;>POKE CLK UP 
BIS @STPSYN. ARXCSR ;SET STRIP SYNC 
MOV #3, COUNT +# OF SYNC CHARS 
1$: MOV #26, STMP1 + CHAR TO BE SHIFTED 
MOV #6. SHIFT ;# OF SHIFTS 
JSR PC, RPOKE ;SHIFT IN THIS CHAR 
TSTB — + RXDONE 
+ 


-v 


BPL , 
ERROR 4 *RXDONE SHOULD NOT BE ASSERTED 
a mag +# OF SYNC CHARS 

N 1 


:; THIS TEST CHECKS THE STRIP SYNC FUNCTION 
;;OF THE RECEIVER LOGIC 

;; MODE: SYNEXT 

+; LENGTH: SEVEN 

;;NOTE: RXDONE SHOULD NEVER ASSERT 

>; CHAR: 26 (SYNC) 


PETTeTiiitiitttttittti ttt ttttttitt ist tit tttetttttittt ttt tt ttt tT: 
SCOPE 


TST 35: 
BIS @MRESET, dTXCSR -;MASTER RESET 
MOV #SYNEXT, APARCSR ; SET THE MODE 
BIS #MRESET, @TXCSR ;MASTER RESET 


SEQ 0050 


DZDUS-B MACY11 3011046) 
DZDUSB. M11 


_ 011404 012777 


011412 
2526 011420 


011426 
011434 
011442 
011450 
011456 
011464 
011472 
011476 
011502 
011504 
011506 
011512 


012777 
052777 


042777 
052777 
052777 
012767 
012767 
012767 
004767 
105777 
100001 
104004 
005367 
001361 


ooco04 
052777 
012777 
052777 


011514 
011516 
011524 
011532 


011540 012777 


012777 
052777 


042777 


011546 
011554 


011562 
011570 
011576 
011604 
011612 
011620 
011626 
011632 
011636 
011640 
011642 


011646 001361 


21-SEP-77 09: 
31-MAY-77 09: 49 


064001 


024026 
000020 


020000 
020009 
000400 
000003 
000026 
000007 
005440 
170210 


167412 


000400 
020000 
000400 


064001 


026026 
000020 


020000 
020000 
000400 
000003 
000026 
000010 
005304 
170054 


167256 


170314 


170302 
170264 


170272 
170264 
170242 
167446 
170014 
167430 


170202 
170170 
170166 


170160 


170146 
170130 


170136 
170130 
170106 
167312 
167660 
167274 
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INITIALIZE THE COMMON TAGS 


+SET MAINT DATA, CLK, BREAK. BMAINTENANCE MODE 
MOV #MTOATAICLK!IMINT! BREAK, @TXCSR 


+SET MODE .# OF BITS.PARITY SENSE.&LOAD SYNC REG 
MOV #SYNEXT! SEVEN! NOPAR ! 26, OPARCSR 
BIS WSYNSCH, ORXCSR ;SET SEARCH SYNC 
+POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK. ATXCSR +POK 
BIS #CLK, @TXCSR ; 
BIS #STPSYN, ORXCSR ;SET STRIP SYNC 
T +# OF SYNC CHARS 


1$ MOV + CHAR TO BE SHIFTED 
MoV #7, SHIFT i# OF SHIFTS 
JSR PC, RPOKE + SHIFT IN THIS CHAR 
MS ng oe +RXDONE ? 
L 
ERROR 4 +RXDONE SHOULD NOT BE ASSERTED 
aa ge :# OF SYNC CHARS 
N 


>; THIS TEST CHECKS THE STRIP SYNC FUNCTION 
7;,OF THE RECEIVER LOGIC 

+; MODE: SYNEXT 

>; LENGTH: E!1GHT 

++NOTE: RXDONE SHOULD NEVER ASSERT 

7; CHAR: 26 (SYNC) 


METITT TTT Titi ttt ttt ttt tt tttt ttt ttt tt ttt ttt tte ttttstt ttt ttt tt ts. 
SCOPE 


TST 36: 
BIS @MRESET.@TXCSR ; MASTER RESET 
MOV RSYNEXT, APARCSR > SET THE MODE 
BIS RMRESET, @TXCSR {MASTER RESET 


;SET MAINT DATA, CLK. BREAK, &MAINTENANCE MODE 
MOV #MTDATAICLK! MINT! BREAK. dTXCSR 


;SET MODE .# OF BITS.PARITY SENSE.&LOAD SYNC REG 
MOV #SYNEXT!E 1GHT!NOPAR ! 26. OPARCSR 
BIS #SYNSCH. ARXCSR ;SET SEARCH SYNC 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK, @TXCSR +POKE CLK UP 
BIS @STPSYN. @RXCSR ;SET STRIP SYNC 
MOV #3. COUNT - +# OF SYNC CHARS 


i$ MOV #26. STMP1 *CHAR TO BE SHIFTED 
MoV #3.. SHIFT :# OF SHIFTS 
JSR PC, RPOKE +SHIFT IN THIS CHAR 
TSTB — +RXDONE ? 
BPL ; 
ERROR *¥ +RXDONE SHOULD NOT BE ASSERTED 
ae — +# OF SYNC CHARS 
N 1 


>; THIS TEST CHECKS THE STRIP SYNC FUNCTION 
;;O0F THE RECEIVER LOGIC 


SEQ 0051 


DZDUS-B MACY11 30(104%6) 


DZ2DUSB. M11 


011650 
011652 
011660 
011666 


011674 


011702 
011710 


011716 
011724 


011732 
011740 
011746 
011754 
011762 
011770 
011776 
012002 
012006 
012010 
012012 
012016 


012020 
012022 
012030 
012036 


012044 


012052 
012060 


012066 
012074 


21-SEP-77 09: 


31-MAY-77 O09: 49 


000004 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 


042777 
052777 
052777 
012767 
012767 
012767 
004767 
105777 
100001 
104004 
005367 
001361 


000094 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 


000400 
030000 
000409 


064001 


030026 
000020 


020000 
020000 


020000 
020000 
000400 
000003 
000026 
o00u05 
005134 
167704 


167106 


000400 
030000 
000400 


064001 


032026 
000020 


020000 
020000 


170046 
170034 
170032 


170024 


170012 
167774 


170002 
167774 


167766 
167760 
167736 
167142 
167510 
167124 


167676 
167664 
167662 


167654 


167642 
167624 


167632 
167624 


12 
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INITIALIZE THE COMMON TAGS 


++ MODE: SYNINT 

++ LENGTH: FIVE 

;;NOTE: RXDONE SHOULD NEVER ASSERT 
++CHAR: 26 (SYNC) 


;; SEANESEANSSUNESSUNESUAESSUSSSURSEANSESAAS000 0000075000 0000 05048 


TST3?: 
BIS MMRESET,@TXCSR ;MASTER RESET 
MOV #SYNINT, @PARCSR > SET THE MODE 
BIS @MRESET.@TXCSR ;MASTER RESET 


+; SET MAINT DATA. CLK, BREAK, &MAINTENANCE MODE 
MOV #MTDATA!CLK!MINT! BREAK, dTXCSR 


;SET MODE .# OF BITS, PARITY SENSE,&LOAD SYNC REG 
MOV #SYNINT!F IVE !NOPAR ! 26, OPARCSR 
BIS #SYNSCH, ARXCSR ;SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION.... 
BIC #CLK, ATXCSR + POKE = DOWN 
BIS #CLK, ATXCSR +POKE CLK UP 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK. ATXCSR +POKE CLK UP 
BIS ®STPSYN, ARXCSR {SET STRIP SYNC 
MOV #3, COUNT 7# OF SYNC CHARS 
1$: MOV #26, STMP1 CHAR TO BE SHIFTED 
MoV #5, SHIFT 7# OF SHIFTS 
JSR PC, RPOKE +SHIFT IN THIS CHAR 
TSTB O@RXCSR ;RXDONE ? 


BPL . +4 

ERROR 4 ;RXDONE SHOULD NOT BE ASSERTED 
_ — ;# OF SYNC CHARS 

N 1 


3; THIS TEST CHECKS THE STRIP SYNC FUNCTION 
;270F THE RECEIVER LOGIC 

;; MODE: SYNINT 

7; LENGTH: SIX 

;;NOTE: RXDONE SHOULD NEVER ASSERT 

>;CHAR: 26 (SYNC) 


Pe O92 256055009505550550353395 9593590009 990090959209 220 0 0d 0 03 0 8 | 
TST4O: SCOPE 

BIS #MRESET,@TXCSR ;MASTER RESET 

MOV @SYNINT, @PARCSR >; SET THE MODE 

BIS @MRESET, @TXCSR -;MASTER RESET 


; SET MAINT DATA, CLK, BREAK, BMAINTENANCE MODE 
MoV RMTDATAICLK! MINT! BREAK, dTXCSR 


SET MODE .# OF BITS.PARITY SENSE.&LOAD SYNC REG 
MOV #SYNINT!SIX!NOPAR ! 26. @PARCSR 
BIS ®SYNSCH, ARXCSR ;SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROI ZATION. 
BIC #CLK, aTXCSR +POKE CLK DOWN 
BIS #CLK, ATXCSR ;POKE CLK UP 


SEQ 0052 


DZDUS-B MACY11 30(1046) 
02 M11 31-MAY-77 


DUSB. 


012102 
012110 
012116 
012124 
012132 
012140 
012146 
012152 
012156 
012160 
012162 
012166 


012170 
012172 
012200 
012206 


012214 


012222 
012230 


012236 
012244 


012252 
012260 
012266 
012274 
012302 
012310 
012316 
012322 
012326 
012330 
012332 
012336 


042777 
052777 


001361 


000004 
052777 
012777 
052777 


012777 


012777 
052777 


042777 
052777 


042777 
052777 
052777 
012767 
012767 
012767 
004767 
105777 
100001 
104004 
005367 
001361 


21-SEP-77 09: 
09: 49 


020000 
020000 
000400 
000003 
000026 
000006 
004764 
167534 


166736 


000400 
030000 
o00c400 


064001 


034026 
000020 


020000 
020000 


020000 
020000 
000400 
000003 
000026 
000007 
064614 
167364 


166566 


167616 
167610 
167566 
166772 
167340 
166754 


167526 
167514 
167512 


167504 


167472 
167454 


167462 
167454 


167446 
167440 
167416 
166622 
167170 
166604 


SSE ee. 4s: ~~ 
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INITIALIZE THE COMMON TAGS SEQ 0053 
+POKE CLK TO GET ot INTO SYNCRONIZATION 
BIC #CLK, aTXCSR +;POKE CLK * 
BIS #CLK, ATXCSR +POKE CLK U 
BIS @STPSYN, ORXCSR ;SET STRIP USYNC 
MOV #3, COUNT + OF SYNC CHARS 
1$: MOV #26, STMP1 CHAR TO BE SHIFTED 
MOV #6, SHIFT +# OF SHIFTS 
JSR PC, RPOKE +SHIFT IN THIS CHAR 
TSTB ORXCSR :RXDONE ? 
BPL . +4 
ERROR 4 +RXDONE SHOULD NOT BE ASSERTED 
DEC COUNT ;# OF SYNC CHARS 
BNE 1$ 
++ THIS TEST CHECKS THE STRIP SYNC FUNCTION 


+7OF THE RECEIVER LOGIC 

>; MODE: SYNINT 

>; LENGTH: SEVEN 

++NOTE: RXDONE SHOULD NEVER ASSERT 
>; CHAR: 26 (SYNC) 


5 ROKK AAAAAA AAA AAA AAA AAA AAA AA AAA AAA AAA AAA AAA AAA AAA AAA KEE 
TST41: SCOPE 

BIS #MRESET,@TXCSR ; MASTER RESET 

MOV @SYNINT. OPARCSR >; SET THE MODE 

BIS #MRESET.@TXCSR -;MASTER RESET 


;SET MAINT DATA. CLK. BREAK, &BMAINTENANCE MODE 
MOV RMTDATA!CLK! MINT! BREAK, aTXCSR 


;SET MODE .# OF BITS,PARITY SENSE, &LOAD SYNC REG 
Mov #SYNINT! SEVEN! NOPAR ! 26. APARCSR 
BIS #SYNSCH, ARXCSR ;SET SYNC SEARCH 
;POKE CLK TO GET RECEIVER INTO SYNCROIZATION .. 
BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK, ATXCSR +POKE CLK UP 
;POKE CLK TO GET LOGIC INTO SYNCRONIZATION 
BIC #CLK, ATXCSR +POKE CLK DOWN 
BIS #CLK, ATXCSR +POKE CLK UP 
BIS RSTPSYN, ARXCSR ;SET STRIP SYNC 


MoV #3, COUNT ;# OF SYNC CHARS 

1S: MOV #26, STMP1 >;CHAR TO BE SHIFTED 
MOV ‘ &7,SHIFT ;# OF SHIFTS 
JSR PC, RPOKE ;SHIFT IN THIS CHAR 
TSTB @RXCSR ;RXDONE ? 
BPL _ +4 
ERROR 4 ;RXDONE SHOULD NOT BE ASSERTED 
DEC a ;# OF SYNC CHARS 
BNE 1 


END OF PASS 

TYPE NAME OF TEST 
UPDATE PASS COUNT 

+ CHECK FOR EXIT TO ACT-11 
;RESTART TEST 


pom ieees 


DZDUS-B MACY11 30(1046) 


DZDUSB. M11 


012340 
012342 
012346 


012406 


012410 
012414 
012422 
012430 
012432 
012436 


012440 
012446 
012450 
012454 
012460 


012466 
012474 
012502 
012506 
012510 
012516 
012522 
012530 
012536 
012544 
012552 
012560 
012566 
012574 
012602 


012604 
012606 
012610 


012612 
012612 
012616 
012622 
012626 
012632 
012640 
012646 


31-MAY-77 


000004 
004 767 
104401 
015476 
104413 


000000 


000167 
062767 
062767 
000241 
006167 
103410 


036767 
001762 
004767 
000167 
012767 


016767 
016767 
004767 
000441 
016767 
004767 
016767 
062767 
016767 
062767 
016767 
062767 
016767 
016767 
000297 


000001 


006 
001712 


013701 


21-SEP-77 09:1 
09: 49 


000340 


012604 
015315 
166564 


166572 


015327 
166560 


167536 
000010 
000010 


166532 


166524 


000034 
000210 
000u01 


166464 
166464 
000002 


166440 


167136 


002 


166564 
166574 
166555 
166260 
166254 
166246 
000042 


166532 
166532 


166520 


166502 


166460 
166460 


004416 


167206 
166424 
167174 
166410 
167162 
166374 
167150 
166360 


166242 
166666 


2 PAGE 
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56 
INITIALIZE THE COMMON TAGS 


_ EOP: 


RUNIT: 
ZERO: 


REPLAY: 


OUTCRY: 


ccc: 


PC. CKSWR 
+ TYPE NAME CF TEST 


, OUTCRY 

- DEVICE 

MULTO ;ARE YOU RUNNING MULTIPLE DEVICES ? 
ccc ;NO, JUMP AROUND 

ACTREG ;ARE ANY DEVICES ACTIVE ? 


RUNIT ;YES 
-MCOW - NO 
ACTREG. RO DISPLAY ACTREG 


SELECT SOMETHING TO RUN @ ACTREG: 
SWITCHES & HIT CONTINUE (PUT SWOO =1) 


. START ;START OVER AGAIN...... YOU DESELECTED EVERYTHING 
#10, BASEADD ;NEXT BLOCK (ADDRESSES) 
#10, BASE IV NEXT BLOCK (VECTORS) 


ROTADD ;UP DATE ROTATING POINTER 
2$ 1S \T THE LAST DEVICE 
+TO BE TESTED IN THIS PASS ? 
ROTADD.ACTREG ;TEST THIS DEVICE FOR ACTIVE STATUS 
RUNIT ; 1F NOT ACTIVE. TRY NEXT ADDRESS 


PC, REPLAY ; CALCULATE NEW PARAMETERS 
RESTRT ;YES IT WAS ACTIVE. TEST THIS DEVICE 
#1,ROTADD ;OK!,NOW SET UP ROTATING 


;POINTER FOR NEXT MULTIPLE PASS 
KEEPADD. BASEADD ; RESTORE BASE ADDRESS 
KEEPIV,BASEIV ;RESTORE BASE INTERRUPT VECTORS 
PC, REPLAY + CALC NEW PARAMETERS 
ccc + JUMP AROUND REPLAY 
BASEADD. DUBASE ;SET UP FOR NEW ADDRESSES 


PC, DUADDR + CREATE NEW ADDRESSES 
BASE IV. DURIV +CREATE DURIV 

#2, BASE IV 

BASE IV. DURIS + CREATE DURIS 

#2, BASE IV 

BASE IV, DUTIV +CREATE DUTIV 

#2, BASE IV 


BASE IV. DUTIS *CREATE DUTIS 
DUR IV, BASE IV > RESTORE 


PC 

6,2 

STSTNM CLEAR TEST NUMBER 
SERRPC > CLEAR LAST ERROR PC 
SERFLG > CLEAR ERROR FLAG 

PASCNT UPDATE PASS COUNT 
PASCNT. LIGHTS DISPLAY PASS COUNT 
PASCNT. SPASS PASS COUNT TO APT 

0842, R1 CHECK FOR ACT-11 OR DOP 


SEQ 0054 


0 5 
DZDUS-B MACY11 3011046) oP ed 09:12 PAGE 57 


DZ0USB. M11 31-MAY-77 09:4 INITIALIZE THE COMMON TAGS SEQ 0055 
2744 012652 001406 BEQ RESTRT + 1F NO CONTINUE TESTING 
2745 012654 000005 RESET 
2746 012656 000005 RESET 
2747 012660 004711 SENDAD: JSR PC, (R1) 

2748 012662 000240 NOP 
2749 012664 000240 NOP 
2750 012666 000240 NOP 
2751 012670 RESTRT: 
2752 012670 012767 003376 166510 MOV #TST1+2,$LPAOR ;LOAD LAST ADOR 
2753 012676 004767 000004 JSR PC, CKSWR 
ne 012702 000167 170402 JMP . BEGIN 
] 
2756 CHECK SWITCH REGISTER ROUTINE. 
2757 CHECKS TO ALLOW FOR < G> TO ALLOW 
coat ; THE CHANGING OF LOCATION 176 
2760 012706 005737 000042 CKSWR: TST O42 
2761 012712 001040 BNE OUT 
2762 012714 022767 000176 166516 CMP ®SWREG, SWR ; SOFTWARE SWR PRESENT? 
2763 012722 001034 BNE OUT ;NO--LEAVE 
2764 012724 105777 166514 TSTB asTKsS + CHECK TTY READY 
2765 012730 190031 BPL OUT + NO--LEAVE 
2766 012732 017767 166510 000422 MOV aSTKB, . MSG GET CHARACTER 
2767 012740 042767 177600 900414 BIC #177600... MSG STRIP JUNK 
2768 012746 122767 000007 000406 CMPB #7,. MSG ;1§ 17 < G& ? 
2769 012754 001017 BNE OUT *NO 
2770 012756 104401 016:03 TYPE »MCNTG 
2771 012762 005137 013022 CNTLU: COM d#ROSW 
2772 012766 104401 016113 TYPE , MMSWR 
2773 012772 104413 CONVRT 
2774 012774 013024 SWREGL 
2775 012776 104406 Si6124 INSTR. MMNEW 
2776 013002 104419 PARAM 
2777 013004 000900 0 
2778 013006 177777 177777 
2779 013010 000176 SWREG 
2780 013012 000 001 .BYTE 9,1 
2781 013014 005037 013022 OUT: CLR d#ROSH | 
2782 013020 000207 RTS PC 
2783 013022 000000 ROSW: .WoRD 0 
2784 013024 000001 SWREGL: 1 
2785 013026 006 062 .BYTE 6,2 
2786 013030 000176 SWREG 
2787 
2788 013032 000005 5 
2789 
2790 ;CHECK FOR FREEZE ON CURRENT DATA 
2791 
2792 013034 004767 177646 . SCOP1: JSR PC, CKSWR 
2793 013040 032777 001000 166372 BIT #SWO9, ASHR 
2794 013046 001402 BEQ 1$ 
2795 013050 016716 166034 MoV LOCK, (SP) 
2796 013054 000002 1$: RTI 
2797 .SBTTL TYPE ROUTINE 
2798 


2799 pe 3$95500000000000000000550000502555 23253322225 29255 30520552223 3 | 


DZDUS-B MACY11 30(1046) 21-SEP-77 09:12 PAGE 58 


OZDUSB. M11 31i-MAY-77 09:49 TYPE ROUTINE SEQ 0056 
2800 ; ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 
2801 ;KTHE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
2802 > KNOTE1: SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
2803 ; KNOTE2: SF ILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
oo a8, SFILLC CONTAINS THE CHARACTER TO FILL AFTER 
2806 > *CAL 
2807 ;*1) “USING A TRAP INSTRUCTION 
2808 ;*% TYPE , MESAOR ;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
2809 ; XOR 
2810 fe TYPE 
2811 ;x MESADR 
2812 jx 
2813 
2814 013056 105767 166375 STYPE: TSTB STPFLG ++ 1S THERE A TERMINAL? 

2815 013062 100002 BPL 1$ ;7BR IF YES 
2816 013064 000000 HALT ;;HALT HERE 'F NO TERMINAL 
2817 013066 000430 BR 3$ +; LEAVE 
2818 013070 010046 15: MOV RO, -(SP) >; SAVE RO 
2819 013072 017600 000002 MoV O2(SP).RO ;;GET ADORESS OF ASCIZ STRING 
2820 013076 122767 000001 166442 CNPB #APTENV, SENV ;;RUNNING IN APT MODE 
2821 013104 001011 BNE 623 ;;NO,GO CHECK FOR APT CONSOLE 
2822 013106 132767 000100 166433 BITB #APTSPOOL, SENVM ;; SPOOL MESSAGE TO APT 
2823 013114 001405 BEQ 623 ;+NO,.GO CHECK FOR CONSOLE 
2824 013116 010067 000004 MOV RO, 615 ;; SETUP MESSAGE ADDRESS FOR APT 
2825 013122 004767 OO0C006' JSR PC, SATY3 >; SPOOL MESSAGE TO APT 
2826 013126 000000 615: WORD O >; MESSAGE ADDRESS 
2827 013130 132767 OO0040 166411 62%: BITB RAPTCSUP,.SENVM ;; APT CONSOLE SUPPRESSED 
2828 013136 001003 BNE 6058 >; YES. SKIP TYPE OUT 
2829 013140 112046 2S: MOVB (RO)+, -(SP) ;;PUSH CHARACTER TO BE TYPED ONTO STACK 
2830 013142 001005 BNE 4§ ;;BR IF IT ISN'T THE TERMINATOR 
2831 06013144 005726 TST (SP)+ 7: 1F TERMINATOR POP IT OFF THE STACK 
2832 013146 012600 605: MOV (SP)+,R0 >; RESTORE RO 
2833 013150 062716 000002 35: ADD #2. (SP) ;;ADJUST RETURN PC 
2834 013154 000002 RTI 7; RETURN 
2835 013156 122716 000011 43: CMPB RHT. (SP) +; BRANCH IF <HT> 
2836 013162 001430 BEQ 8s 
2837 013164 122716 000200 CMPB RCRLF, (SP) ;;BRANCH IF NOT <CRLF> 
2838 013170 001006 BNE 55 
2839 013172 005726 TST (SP)+ ;;POP <CR><LF> EQUIV 
2840 013174 104401 TYPE +; TYPE A CR AND LF 
2841 013176 001523 SCRLF 
2842 013200 105067 000130 CLRB SCHARCNT 3;CLEAR CHARACTER COUNT 
2843 013204 000755 BR 2$ +;GET NEXT CHARACTER 
2844 013206 004767 000056 55: JSR PC, STYPEC ;:GO TYPE THIS CHARACTER 
2845 013212 126726 166240 6S: CMPB SFILLC, (SP)+ 7218S 1T TIME FOR FILLER CHARS. ? 
2846 013216 001350 BNE 23 33 1F NO GO GET NEXT CHAR 
2847 013220 016746 166230 MoV SNULL, - (SP) ;;GET ® OF FILLER CHARS. NEEDED 
2848 >; AND THE NULL CHAR. 
2849 013224 105366 000001 7s: DECB 1(SP) ;;DOES A NULL NEED TO BE TYPED? 
2850 013230 002770 BLT 6$ ;;BR IF NO--GO POP THE NULL OFF OF STACK 
2851 013232 004767 000032 JSR PC, STYPEC ;;G0 TYPE A NULL 
2852 013236 105367 000072 DECB SCHARCNT +;00 NOT COUNT AS A COUNT 
coe 013242 000770 BR 73 +; LOOP 
y 
2855 ;HORIZONTAL TAB PROCESSOR 


DZ0US 


013244 
013250 
013254 
013262 
013264 
013266 
013270 
013274 
013276 
013304 
013312 
0123314 
013320 
013322 
013330 
013332 
013334 
013336 


013340 
013346 
013352 
013356 
013360 
013362 
013364 
013370 
013374 
013400 
013402 
013406 
013412 
013416 
013420 
013424 
013426 
013432 
013434 
013442 
013444 
013446 
013450 
013452 
013454 


013456 
013460 
013464 
013470 
013474 


D20US-8 MACY11_ 301046) 
Mil 31-MAY-77 


112716 
004 767 
132767 


000207 


017667 
062716 
105767 
001036 
104401 
000000 
012704 
012703 
105777 
100375 
117714 
142714 
121427 
001760 
122427 
001413 
105777 
100375 
117777 
005393 
001353 
104401 
015423 
000742 
000002 


011605 
012567 
012567 
012567 
112567 


21-SEP-77 09: 


09: 49 


000040 
000014 
000007 


166154 


000002 
000015 


000014 
000012 


000000 
000002 
16€170 


016136 
000007 
166044 


166040 
000200 
000025 
000015 
166016 


166006 


000162 
000160 
000156 
000154 


000052 


166146 
000002 


000002 


000014 


166010 


12 PAGE 
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TYPE ROUTINE 


83: 
95: 


STYPEC: 


18: 


8 
SCHARCNT: . WORD 
STYPEX: 


_ INSTR: 


28. 


_ INSTE: 


INSTR2: 


. PARAM: 


RTS 


#' . (SP) 
PC, STYPEC 
earn 1p 


(SP)+ 
23 
asTPs 
STYPEC 


2(SP), dSTPB 
ein 


1 
SCHARCNT 
STYPEX 
#LF,2(SP) 
STYPEX 
(PC) + 

0 

PC 


7; REPLACE TAB WITH SPACE 
+; TYPE A SPACE 

3; BRANCH IF NOT AT 

+; TAB STOP 

;;POP SPACE OFF STACK 

;;GET NEXT CHARACTER 

;;WAIT UNTIL PRINTER IS READY 


;+LORAO CHAR TO BE TYPED INTO DATA REG 
i+ tS ye bo A CARRIAGE RETURN? 
++BRANCH IF NO 

att ey CHARACTER COUNT 


EX 
+; 1S CHARACTER A LINE FEED? 
+;BRANCH IF YES 

++COUNT THE CHARACTER 

+; CHARACTER COUNT STORAGE 


ASCII STRING INPUT ROUTINE 


BR 
RTI 


a(SP),.MSG ;PICK UP MESSAGE 
#2, (SP) ; JUMP AROUND MESSAGE FOR RTI 
SENV +APT CONTROL 
INSTR2 ;YES NO TYPE 
# INBUF, RY >GET STARTING LOC OF INBUF 
#7,R3 ;MAX # OF CHARS 
aSTKS ;TTY FLAG 
1$ 
OSTKB, (RY) > TAKE CHAR 
#200, (R4) ; STRIP 
(R4), #25 steut< © 
INST1 
CRY) +, 815 ; CHECK FOR CR 
INSTR2 
aSsTPS > TEST FLAG 
2$ 
aSTKB. aSTPB > ECHO CHARACTER 
R3 >DID YOU TYPE TOO MANY CHARS ? 
1$ 
37 
_INST1 ;RETRY 


+ CONVERT ASCII STRING TO OCTAL 
(SP),RS ;PUT CONTENTS OF SP INTO R5 


(R5)+,LOLIM 
(R5)+,HILIM 
(R5)+, DEVADR 
(R5)+,LOBITS 


;PUT LOW LIMIT INTO LOLIM 

+PUT HIGH LIMIT INTO HILIM 
PUT STORE LOC INTO DEVADR 
;PUT MASK INTO LOBITS 


SEQ 0057 


DZDUS-B MACY11 ph ty 


DZD0USB. M11 


013500 
013504 
013506 
013510 
013514 
013520 
013522 
013526 
013530 
013534 
013536 
013542 
013544 
013550 
013552 
013554 
013556 
013560 
013562 
013566 
013570 
013574 
013576 
013600 


013602 
013606 
013610 
013614 
013616 
013622 


013624 
013630 
013632 
013636 
013642 
013644 
013646 
013650 
013652 
013654 


013656 


013664 
013670 


31-MAY-77 
112567 


005737 
001023 
104407 
000742 


020567 
101365 
020567 
103762 
136705 
001357 


016704 
010524 
062705 
105367 
001372 
000002 
000000 
000000 
000000 
000000 
013655 


016667 


010567 
010467 


09:4 
000151 
00015 
000060 
000067 
000060 
000015 


000015 
013022 


000042 
000032 
000032 


000022 


000002 
000013 


000004 


165604 
165576 


165242 


21- * ye -77 09:12 PAGE 60 


TYPE ROUTINE 


PARAM: 


1$: 


PARERR: 


1208: 


LIMITS: 


18: 


PARTI: 
LOL IM: 
HILIM: 


DE VADR: 
LOBITS: 
ADRCNT=LOBITS+1 


. SAVOS: 


SvOS: 


(R5)+, ADRCNT ;PUT COUNT INTO ADRCNT 
~ erate ;RESTORE RETURN ADDR ON STACK FOR RTI 


5 

bhp Lay 

#15, (RY CR ? 

PARERR you TYPED CR TOO SOON ! 

(R4), #60 ;LOW LIMIT ASCII O 

PARERR 

(RY), #67 +HIGH LIMIT ASCII 7 

PARERR 

#60, (RY) ; CONVERT TO OCTAL 

CR4)+,R5 + STORE AWAY ITS AN OK CHAR 


+CR 
LIMITS ;NOW CHECK FOR HIGH &LOW LIM!T CONDS 
RS ;ALLOCATE ROOM FOR NEXT CHAR 


+) Iasi > CR? 
d#ROSW +CK SWP USED 


7 RETRY 
PARAMI 


; TEST TO SEE IF NUMBER IS WITHIN LIMITS 


RS, HILIM 

PARERR ;THE # IS TOO HIGH 

R5,LOLIM 

PARERR ;THE # iS TOO LOW 

LOBITS, RS ; TEST BY MASKINGTHE & 
PARERR 


>STORE NUMBER AT SPECIFIED ADDRESS 


0 
0 
0 


DEVADR, RY >GET STARTING ADDR OF 
RS, (RY) + + STORE AT THIS ADDP 


#2,.R5 
ADRCNT -;HOW MANY TIMES + 2 ? 
1$ 


;SAVE PC OF TEST THAT FAILED AND R0-RS 


MOV 4( SP), SAVPC 
; SAVE RO-RS 

MoV RS, SREGS 
MoV R4, SREGY 


SEQ 0058 


DZDUS-B MACY11 3011046) 


DZ2DUSB. M11 


013674 
013700 
013704 
013710 
013714 


013716 
013722 
013726 
013732 
013736 
013742 
013746 


013750 
013752 
013754 
013760 
013764 
013770 
013774 
014000 


014004 
014010 
014014 
014020 
014022 
014026 
014032 
014034 
014036 


014122 


31-MAY-77 


010367 
010267 
010167 
010067 
000002 


016700 
016701 
016702 
016703 
01€704 
016705 
000002 


104401 
015427 
017601 
062716 
012167 
112167 
112167 
013167 


016704 
116705 
012700 
010403 
042703 
062703 
110320 
006204 
006204 
006204 
005305 
001365 
012703 
114023 
105367 
001374 
105767 
001405 
112723 
105367 
001373 
105013 
104401 
016242 
005367 
001325 
000002 
000000 
000000 


09: 


165570 
165562 
165554 
165546 


165540 
165535 
165534 
165532 
165530 
165526 


000000 
000002 
000130 
000126 
000123 
000120 


000114 
000106 
016200 


177770 
000260 


016242 
000042 
000035 


000240 
000023 


000004 


21- " ale -77 09:12 PAGE 61 


TYPE ROUTINE 


. RESOS: 


. CONUR: 


23: 


38: 


4S: 


5S: 


6S: 


WROCNT. 
CHRCNT: 


MOV R3. $REGS 
MOV RZ, $REGZ 
MOV R1,$REG1 
MOV RO. $REGO 


*RESTORE RO-RS 


MOV SREGO. RO 
MOV SREG1.R1 
MOV SREG2.R2 
MoV SREGS.R3 
MOV SREG4Y, RY 
MOV SREGS. RS 


; CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 


MCPLF ;CR LF 
MoV a(SP),R1 ;PICK UP DATA POINTER 
ADD #2.(SP) ;SET UP SP FOR PTI 
MOV (R1)+, WROCNT >PICK UP # OF WORDS FROM TABLE 
MOVB (R1)+, CHRCNT PICK UP # OF CHARS FROM TABLE 
MOVB (R1)+, SPACNT PICK UP # OF SPACES FROM TABLE 
MOV @(R1)+,BINWRD ;PICK UP ADDRESS OF MSG 

;FROM TABLE 


MoV BINWRD. RY + SAVE 

MOVB CHRCNT, RS + SAVE 

MOV a#TEMP. RO STARTING ADDRESS OF TEMP BLOCK 
MOV R4Y,R3 + SAVE 

BIC #177770,R3 ;CLR OUT UPPER BITS .. SAVE CHAR 
ADD #260,.R3 ; CONVERT TO ASCI! 

MOVB RZ, (RO)+ 7 STORE AWAY 

ASR R4 +SHIFT FOR NEXT & 

ASR R4 DITTO 

ASR R4 DITTO 

DEC RS >DEC CHAR COUNT 

BNE 3$ -D0 IT AGAIN ? 

MoV #MDATA, RZ STARTING ADDRESS OF MOATA BLOCK 
MOVB (RO), (R3)+ REVERSE THE ORDER OF NUMBERS 
DECB CHRCNT ; DEC ov COUNT 

BNE 4§ >DO0 IT AGAIN ? 

TSTB SPACNT ;HOW MANY SPACES ? 

BEQ 6$ + TYPE # IF BR =0 

MOVB #240, (R3)+ "SPACE" IN ASCII 

DECB SPACNT ;DEC #@ OF Ee COUNT 

BNE 5$ ;D0 IT AGAIN 


CLRB (R3) ; INSERT "O" FOR TTY QUTPUT ROUTINE 


MDATA 8; THIS MESSAGE 
DEC WROCNT ;HOW MANY &'S ? 


BNE 1% ;DO0 THIS ROUTINE AGAIN IF NOT EQUAL TO O 
RTI RETURN TO PROGRAM 

0 

0 


SEQ 0059 


DZDUS-B MACY11 30(1046) 21-SEP-77 09:12 PAGE 62 


DZ2DUSB. M11 31-MAY-77 09: 49 TYPE ROUTINE SEQ 0060 
3024 014123 SPACNT=CHRCNT+1 
3025 014124 000000 BINWRD: 0 
3027 ;COMPARE THE FIRST CHARACTER IN THE TELETYPE 'NPUT 
3028 ;BUFFER TO THE CHARACTERS "N" AND ' 
3029 ;1F THE CHARACTER IS "N" CLEAR THE FLAG 
3030 7 IF THE CHARACTER IS “Y" SET THE FLAG 
3032 014126 017605 000000 _ SETFLG: MOV a(SP),RS 
3033 O14132 122767 000116 001776 CMPB so 'N. INBUF 71S IT "N" ? 
3034 014140 001002 BNE 1S 
3035 014142 105015 CLRB = (RS)~—Ss 000 
3036 014144 O0C4D6 BR 2$ 
3037 014146 122767 000131 001762 1%: CMPB.«#'Y, INBUF ;1$ 17 “Y* ? 
3038 014154 001005 BNE 3$ 
3039 014156 112715 177777 MOVB = #-1, (RS) ; 377 
3040 014162 062716 000002 25: ADD #2, (SP) 
3041 O14166 000002 RTI 
3042 014170 104407 3S: INSTER ; RETRY 
3043 014172 000755 BR SETFLG 
3044 -SBTTL ERROR HANDLER ROUTINE 
4 
3046 Mettstttttttettittttittttitsttittetstsitstsitsesstses sss ttt tess 
3047 | XTHIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
3048 ;¥SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
3049 ;#AND GO TO SAVIT ON ERROR 
3050 ;XTHE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE 
3051 7 *SW15=1 HALT ON ERROR 
3052 ;4SW13=1 INHIBIT ERROR TYPEOUTS 
3053 ;¥SW10=1 BELL ON ERROR 
3054 ; #SHO9=1 LOOP ON ERROR 
3055 > CALL 
3056 ot ERROR N ;;ERROR=EMT AND N=ERROR 1 TEM NUMBER 
3057 
3058 014174 SERROR: 
3059 014174 105267 165203 75: INCB = SERFLG :;SET THE ERROR FLAG 
3060 014200 001775 BEQ 7§ ;;DON'T LET THE FLAG GO TO ZERO 
3061 014202 016777 165174 165232 Mov STSTNM, ADISPLAY ;; DISPLAY TEST NUMBER AND ERROR FLAG 
3062 014210 032777 002000 165222 BIT #81T10, aSWR ;;BELL ON ERROR? 
3063 014216 001402 BEQ 18 :;NO - SKIP 
3064 014220 104401 001516 TYPE  ,$BELL > RING BELL 
3065 014224 005267 165162 15: INC SERTTL ;; COUNT THE NUMBER OF ERRORS 
3066 014230 011667 165162 Nov (SP), SERRPC ;;GET ADDRESS OF ERROR INSTRUCTION 
3067 014234 162767 000002 165154 SUB #2, SERRPC 
3068 014242 117767 165150 165144 MOVB @SERRPC,SITEME =; STRIP AND SAVE THE ERROR ITEM CODE 
3069 014250 032777 020000 165162 BIT #8 1T13, aSUR ;;SKIP TYPEOUT IF SET 
3070 014256 001004 BNE 205 >; SKIP TYPEOUTS 
3071 014260 004767 000072 JSR PC, SAVIT ;;G0 TO USER ERROR ROUTINE 
3072 014264 104401 001523 TYPE  , SCRLF 
3073 014270 20S: 
3074 014270 122767 000001 165250 CMPB so BAPTENV,SENV =; RUNNING IN APT MODE 
3075 014276 001007 BNE 28 ;;NO, SKIP APT ERROR REPORT 
3076 014300 116767 165110 000004 MOVE SITENB, 218 ;;SET ITEM NUMBER AS ERROR NUMBER 
3077 014306 004767 000016" JSR PC, SATYY ;;REPORT FATAL ERROR TO APT 
3078 014312 000 216:  .BYTE O 
3079 014313 000 BYTE 0 | 


DZ0US-B MACY11 30(104%6) 


DZ0USB. M11 


014314. 


014316 
014322 
014324 
014326 
014334 
014336 
014342 
014346 
014350 
014354 
014354 
014356 
014362 
014366 
014372 
014376 
014402 
014406 


014414 
014414 
014420 
014422 
014424 
014430 


014432 


014436 
014440 
014442 
014444 
014446 
014450 
014452 
014456 
014462 
014464 
014466 
014470 
014474 
014500 
014502 
014504 
014506 
014512 
014514 
014516 


31-MAY-77 09:49 


000777 
005777 
100001 
000000 
032777 
001402 
016716 
005767 
001402 
016716 


000002 
010067 
010167 
010267 
010367 
010467 
010567 
016767 


104401 
010046 
005000 
153700 
001004 


016746 
104402 


012600 


21-SEP-77 09:12 PAGE 63 
ERROR HANDLER ROUTINE 


;,APT ERROR LOOP 

;;HALT ON ERROR 

7;SKIP IF CONTINUE 

;;HALT ON ERROR! 

te ON ERROR SWITCH SET? 


+ BR NO 
; FUDGE RETURN FOR LOOPING 
+; CHECK FOR AN ESCAPE ADDRESS 
+7BR IF NONE 
;;FUDGE RETURN ADDRESS FOR ESCAPE 


35 MEXAKAAAAARA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAAS 
;XTHIS ROUTINE USES THE “ITEM CONTROL BYTE” (SITEMB) TO DETERMINE WHICH 


FROM THE “ERROR TABLE" (SERRTB), 


; AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 


+; "CARRIAGE RETURN" & “LINE FEED" 
R 
++PICKUP THE ITEM INDEX 


+; 1F ITEM NUMBER IS ZERO, 

+; TYPE THE PC OF THE ERROR 

+;SAVE SERRPC FOR TYPEOUT 

++ERROR ADDRESS 

+;GO TYPE--OCTAL ASCIICALL DIGITS) 

+;GET OUT 

eeeey THE INDEX SO THAT IT WILL 
; WORK FOR THE ERROR TABLE 


JUST 


+;FORM TABLE POINTER 

+;PICKUP “ERROR MESSAGE" POINTER 
+;SKIP TYPEOUT IF NO POINTER 

+; TYPE THE “ERROR MESSAGE” 
++"ERROR MESSAGE” POINTER GOES HERE 
+2 "CARRIAGE RETURN" & “LINE FEED" 
+;PICKUP “DATA HEADER” POINTER 
+SKIP TYPEOUT iF O 

+; TYPE THE “DATA HEADER” 

+; “DATA HEADER" POINTER GOES HERE 
3; “CARRIAGE RETURN” & “LINE FEED" 
;;PICKUP “DATA TABLE” POINTER 
+;GO TYPE THE DATA 


228: BR 22% 
165116 23: TST ASHR 
BPL 3$ 
HALT 
001000 165104 33%: BIT #81 T09,. dSWR 
BEQ 4§ 
165046 MOV SLPERR, (SP) 
165146 4$: TST SESCAPE 
BEQ 5$ 
165149 - MOV SESCAPE, (SP) 
RTI ++ RETURN 
164546 SAVIT: MOV RO. HLOO 
164544 MOV R1,HLD1 
164542 MOV RZ, HLDZ 
164540 MOV R3.HLD3 
164536 MOV R4, HLDY 
164534 MOV R5, HLDS 
164770 164530 MoV STSTNM, HLD6 
.SBTTL ERROR MESSAGE TYPEOUT ROUTINE 
;*ERROR 1S TO BE REPORTED. IT THEN OBTAINS, 
SERRTYP: 
001523 TYPE - SCRLF 
MoV RO, - (SP) ++ SAVE 
CLR RO 
001414 BISB O#$1TEMB, RO 
BNE 1% 
164760 MOV SERRPC, -(SP) 
TYPOC 
BR 6$ 
1$ DEC RO 
ASL RO 
ASL RO 
ASL RO 
001652 ADD #SERRTB. RO 
000004 MOV (RO)+, 2% 
BEQ 3$ 
TYPE 
23: .WORD 0 
001523 TYPE - SCRLF 
000004 38: MOV (RO)D+,4$ 
BEQ 5$ 
TYPE 
4S: .WORD 0 
001523 TYPE » 9CRLF 
5S: MoV (RO), RO 
BNE 74 
6$: MoV (SP)+,R0 


>+RESTORE RO 


SEQ 0061 


DZDUS-B MACY11 ptt hee 2 


DZDUSB. M11 


014520 
014524 
014526 
014526 
014530 
014532 
014534 
014536 
014542 
014544 


014550 
014554 
014562 
014566 
014572 
014574 
014602 
014610 
014616 
014620 
014622 
014624 
014630 
014632 
014636 
014642 
014646 
014652 
014654 
014656 


31-MAY-77 
104401 
000207 


013046 
104402 
005710 
001770 
104401 
000771 
020040 
014550 


017646 
116667 
112667 
062716 
000406 
112767 
112767 
112767 
010346 
010446 
010546 
116704 
005404 
062704 
110467 
116704 
016605 
005003 
006105 
000404 


09: 4 
001523 


014544 
009 


000000 
000001 
000207 
000002 


000001 
000006 
oo000s 


000145 


000006 
000132 
000125 
000012 


000211 


000171 
000165 
000154 


K 5 
64 
ERROR MESSAGE TYPEOUT ROUTINE 


21- ie -77 09:12 PAGE 


TYPE » SCRLF i+ "CARRIAGE RETURN" & “LINE FEED" 
= RTS PC ++ RETURN 

MOV O(RO)+, -(SP) +:SAVE a(RO)+ FOR TYPEOUT 

TYPOC 3+GO TYPE--OCTAL ASCIIC(ALL DIGITS) 

TST (RO) ++ 1S THERE ANOTHER NUMBER? 

BEQ 6$ ++BR IF _NO 

TYPE - 8$ ee TWO(2) SPACES 

BR 7$ LOOP 
8$: .ASCIZ 7 7 ;;TWO(2) SPACES 


_ EVEN 
.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


3s REXKAAAAAA AAA AAA AAA AAA AAA AAA ATA AAA AA AAA AAA AAA AA AAA AES 

;XTHIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
*XOCTAL (ASC!1) NUMBER AND TYPE IT. 

+ SSTYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


38 MOV NUM, -(SP) ;;NUMBER TO BE TYPED 

a 3 TYPOS ;;CALL FOR TYPEOUT 

;x . BYTE N ;i;N21 TO 6 FOR NUMBER OF DIGITS TO TYPE 
7x . BYTE M +;M=1 OP O 

Fe | +;1=TYPE LEADING ZEROS 

;x ;,Q0=SUPPRESS LEADING ZEROS 

;x 


; ¥STYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
;XSTYPOS OR STYPOC 


> XCALL: 

;x MoV NUM, - (SP) ;;NUMBER TO BE TYPED 
= TYPON ;;CALL FOR TYPEQUT 

; SSTYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
> ¥CALL: 
ot MoV NUM, - (SP) ;;NUMBER TO BE TYPED 
;x TYPOC ;;CALL FOR TYPEOUT 
STYPOS: MOV a(SP),-(SP) ;;PICKUP THE MODE 


MOVB 1(SP), SOF ILL +;LOAD ZERO FILL SWITCH 

MOVB (SP)+,SOMODE+1 ~+;NUMBER OF DIGITS TO TYPE 

ADD #2, (SP) ;;ADJUST RETURN ADDRESS 

BR STYPON 
STYPOC: MOVB #1, S$0F ILL ++SET THE ZERO FILL SWITCH 

MOVB #6, SOMODE +1 +-SET FOR SIX(6) DIGITS 
STYPON: MCVB #5, SOCNT +; SET “ ITERATION COUNT 


MoV R3,- (SP) ++ SAVE 
Mov R4,-(SP) +; SAVE RY 
MOV R5, - (SP) +; SAVE RS 
~+ eet ae +,GET THE NUMBER OF DIGITS TO TYPE 
NE 4 
ADD #6,R4 +; SUBTRACT IT FOR MAX. ALLOWED 
MovB R4, SOMODE +;SAVE IT FOR USE 
MOVB SOF ILL. RY +;GET THE ZERO FILL SWITCH 
MOV 12(SP),R5 +;PICKUP THE !NPUT NUMBER 
CLR R3 +-CLEAR THE OUTPUT WORD 
1$: ROL RS ;;ROTATE MSB INTO “C" 
BR 3$ +260 DO MSB 


SEQ 0062 


DZOUS-B MACY11 30(1046) 


DZO0USB. M11 


014660 


014774 


014776 


015032 


015034 


015046 
015050 


31-MAY-7 


006105 
006105 
006105 
010503 
006103 
105367 
100016 
042703 


000000 


010046 
010146 
010246 
010346 
010446 
010546 
016746 
010667 
012767 
000000 
000777 


016706 


012601 


77 O9: 


000076 
177770 


000060 
000040 
000040 
014770 
000032. 


000002 900004 


163006 
164074 
015034 162774 


164056 


2s: 


3S: 


6S: 


8$: 
SOCNT: 


SOFILL: . 
SOMODE: 


SPWRON: 
. PFAIL: 


RESTAR: 


21-SEP-77 09:12 PAGE 65 
49 BINARY TO OCTAL (ASCII) 


L 5 
AND TYPE 
;;FORM THIS DIGIT 


2(SP),4(SP) 
(SP)+, (SP) 


0 
0 
0 
0 


;;GET LSB OF THIS DIGIT 
3; TYPE THIS DIGIT? 


;-BR IF NO 


++GET RID OF JUNK 
OR 


++ TEST F 


a THIS 0? 


;+BR IF YES 


+;DON'T SUPPRESS ANYMORE O'S 
++MAKE THIS DIGIT ASCII 
+;MAKE ASCII IF NOT ALREADY 
+; SAVE FOR TYPING 

++GO TYPE THIS DIGIT 


;;COUNT BY 1 


++BR IF MORE TO DO 


++BR IF DONE 


3; INSURE LAST DIGIT ISN'T A BLANK 
+;GO DO THE LAST DIGIT 
+;RESTORE RS 


>+RESTORE RY 
>; RESTORE 


R3 
++SET THE STACK FOR RETURNING 


7; RETURN 


i+ STORAGE FOR ASCII DIGIT 
++ TERMINATOR FOR TYPE ROUTINE 
hing DIGIT COUNTER 
+ ZERO FILL SWITCH 
>;NUMBER OF DIGITS TO TYPE 


WORD OQ 
SENTER HERE ON POWER FAILURE 


PROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 


RESTORE STACK POINTER 
RESTORE RO-RS 


RO, - (SP) 
R1,-(SP) 
R2, - (SP) 
R3, - (SP) 
RY, - (SP) 
RS, - (SP) 
24, - (SP) 
SP, SAVSP 
#RESTART, 24 


SAVSP. SP 
(SP)+,R5 
(SP)+,R4 
(SP)+,R3 
(SP)+,R2 
(SP)+,R1 


SAVE RO-RS ON PROCESSOR STACK 


SAVE STACK POINTER 
SET UP FOR POWER UP TRAP 
>HALT ON POWER DOWN NORITAL 


SEQ 0063 


DZDUS-B MACY11 30(104%6) 


DZ2DUSB. M11 


015052 


015446 


31-MAY-77 


012600 
012767 
166427 
012706 
005067 
005267 
001375 
104413 
015130 


051101 


09 


014776 
000340 
001100 
001102 
001076 


164263 
164272 
163754 


002 


042012 
042040 


051124 
047412 


037440 
000012 
044501 
042522 
020124 


21-SEP-77 09:1 
249 


162742 


053125 
042132 
052040 
020103 


041505 


042104 
044526 


040040 
043505 


043126 
052105 
040514 
053105 
051123 
026523 


000 
026114 


052123 
052101 


2 PAGE 66 
BINARY TO OCTAL 
MOV 
MOV 
MTPS 
MOV 
CLR 
INC 
BNE 
CONVRT 
PFTAB 
TYPE 
MPFAIL 
CLR 
CLR 
JMP 
PFTAB: 1 
. BYTE 
RETURN 
MTITLE: . ASCIZ 
MVECTO: . ASCIZ 
MREGAD: . ASCIZ 
MMULT: .ASCI2 
MLASTD: . ASCIZ 
DEVICE: . ASCIZ 
MCOW: . ASCI2 
MRANGE: . ASCIZ 
MQM: . ASCIZ 
MCRLF: .ASCIZ 
MPFAIL: . ASCIZ 


n 5 
(ASCII) AND TYPE 


(SP)+,R0 
#. PFAIL, 24 
340 
STACK, SP 
TEMP 

TEMP 

.% 


SEQ 0064 


;SET UP FOR POWER FAILURE 


SERFLG 

SERRPC 

ORE TURN 
6,2 


€15>¢12><12>/0UV11 DZDUS-B TAPE C 7<15><12> 


<15><12>/VEC ADD-7 
€15><12>71ST DEV: REC CSR ADD-/ 


€15>¢12>/7MULT DEV 7? (Y OR N)-/ 


<15><12>/LAST DEV: REC CSR ADDPR-/ 


7=DEVICE 7 
<15><12>/SELECT TO RUN @ACTREG/ 


<15><12>/0VFLG: RETYPE LAST DEV RXCSR ADDS-/ 


- OW 
«15><12 


> 
7PFAIL, RESTART AT TEST IN PROGRESS/ 


DZDUS-B8 MACY11 30(104%6) 
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015454 


016113 
016120 
016124 
016132 


31-MAY-77 


020075 


21-SEP-77 09 
09: 49 


051505 


020124 


042520 


000 
051505 
000055 
045503 
052040 
024040 
047040 


047440 
041516 
051522 
041505 
020050 
031040 


020123 
046530 
044527 
032505 
047111 
047440 
000055 
051440 
041505 
041524 
026465 
020077 
020122 


047440 


047040 
04 3536 
036522 
053505 


:12 


PAGE 6 
BINARY TO 
MEPASS: 


MR: 
MTSTPC: 
MLOCK: 


MSYNC: 


MWIREG: 


MWIRES. 


MWIREY: 


MEXT J: 


MCNTG: 
MMSHR: 
MMNE HW: 


? 
OCTAL 


. ASCIZ 


.ASCIZ 
. ASCIZ 


. ASCIZ 


. ASCIZ 


.ASCIZ 


.ASCIZ 


. ASCIZ 


_ASCIZ 


_ASCIZ 
_ASCIZ 


ASCIZ 


N 5 
(ASCII) AND TYPE 


<15><12>/END OF PASS TAPE C/ 


€15><412>7R7 
€15><12>/7TEST PC-7 


€15><12>7LOCK ON TEST? (Y OR N)-/ 


€15><12>7# OF SYNC CHARS SELECTED ( 1 OR 2)-/ 


<15><12>/1S SEC XMIT SWITCH E55-2 IN? (Y OR ND-7 


<15><12>71S SEC REC SWITCH E55-3 IN? (Y OR N)-2 


€15><12>71S OPT CLR ENABLE SWITCH ESS 1 IN? (CY OR N)-/ 


€15><12>412>/R315 CONNECTOR ON 70Y OR N)-/ 


41§6><12>7 G / 
/ SWR= / 
/ WEW= / 


SEQ 0065 


DZDUS-B MACY11 30(1046) 
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016136 
016200 
016242 


016304 


016304 
016304 
016310 
016314 
016320 


016322 
016330 


016364 
016366 


016370 
016374 
016402 
016406 
016412 
016414 
016416 
016422 
016424 
016424 


000000 
016200 
000000 
016242 
000000 
016304 


004767 
005067 
022716 
001422 


032777 
001412 
016767 
000406 
105777 
100123 
017766 
032777 
001114 


000416 
013746 


000423 
032777 


B 6 
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174376 
163102 
003376 
040000 
163044 
163076 


163072 
040000 


000004 
016414 
177060 
000004 


000004 


000400 


163110 
163046 


177776 
163054 


000004 


163006 


BINARY TO OCTAL (ASCII) AND TYPE 


. EVEN 
;BUFFERS FOR INPUT-OUTPUT 
INBUF: 0 
=, +40 
TEMP: 0 
. =, +40 
MDATA: 20 


. =, +40 
.SBTTL SCOPE HANDLER ROUTINE 


3s RAEXAAAAAAAAAAAAAAAAA AAA AAA AA AA AAA AAA AAA AA AAA AAA AAA AA AAA AAAS 
;XTHIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
;*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7: Q>) 
;*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15: 08> 

;XTHE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 


**SW14=1 LOOP ON TEST 

;*SW11=1 INHIBIT ITERATIONS 

+ XSWO9=1 LOOP ON ERROR 

+ XSWO8=1 LOOP ON TEST IN SWR<?7: 0> 
> XCALL 

eS SCOPE ++ SCOPE=10T 
SSCOPE: 


; SCOPE LOOP AND INTERATION HANDLER 


. SCOPE: 
JSR PC, CKSWR 
CLR SERRPC >;CLEAR LAST ERROR PC 
CMP #TST1+2, (SP) ;1S SCOPE AT BEGINING OF TEST 1? 
BEQ SXTSTR + YES NO LOOP 
TTST: BIT #B1T14, dSWR >; THIS CODE tS FOR TESTING FOR BIT 14 
BEQ 1$ ;ON LS! WHICH SYSMAC CANNOT HANDLE 
MOV STSTNM, SLPADR 
BR 1$ 
TSTB asTKS ; KEYBOARD DONE? 
_ BPL SOVER >BR IF NO 
MoV OSTKB, -2(SP) > CLEAR DONE BIT 
15: BIT #81714. dSWR ;;LOOP ON PRESENT TEST? 


SOVER ;7YES IF SW14=1 
;RRRRRSTART OF CODE FOR THE XOR TESTERS&&SS 
SXTSTR: BR 6$ 3; 1F RUNNING ON THE “XOR" TESTER CHANGE 
3: THIS INSTRUCTION TO A “NOP” (NOP=240) 
MoV DeERRVEC.-(SP) <>; SAVE THE CONTENTS OF THE ERROR VECTOR 
MoV #5S, DRERRVEC ;;SET FOR TIMEOUT 


TST #177060 +2 TIME OUT ON XOR? 
MoV (SP)+,@#ERRVEC +; RESTORE THE ERROR VECTOR 
BR SSVLAD +;GO TO THE NEXT TEST 
5S: CMP (SP )+, (SP)+ +;CLEAR THE STACK AFTER A TINE OUT 


MOV (SP)+,@#ERRVEC +=; RESTORE THE ERROR VECTOR 

BR 7$ +;LOOP ON THE PRESENT TEST 
6S: ;###RREND OF CODE FOR THE XOR TESTER#S8#RE 

BIT #B1TO8, dSWR ;LOOP ON SPEC. TEST? 


SEQ 0066 
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3416 
3417 


016432 
016434 
016442 
016444 
016450 
016452 
016460 
016462 
016470 
016472 
016500 
016502 
016506 
016512 
016514 
016522 
016524 
016530 
016532 
016536 
016544 
016546 
016554 
016562 
016566 
016574 
016600 
016604 
016610 
016616 
016624 
016630 
016632 
016634 
016636 


016640 
016642 
016646 
016650 
016652 
016654 
016660 


016662 
016664 


21-SEP-77 09: 
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001404 
127767 
001465 
105767 
001421 
126767 
101015 
032777 
001404 
016767 
000446 
105067 
005067 
000415 
032777 
001011 
005767 
001406 
005267 
026767 
002024 
012767 
016767 
105267 
116767 
011667 
011667 
005067 
112767 
016777 
016716 
000002 
001407 
000432 
000005 


010046 
016600 
005740 
111000 
006300 
016000 
000200 


011646 
016666 


163000 
162733 
162737 
001000 
162712 


162675 
163000 


004000 
163004 


162646 
162750 


000001 
000056 
162614 
162610 
162606 
162604 
162704 
000001 
162560 
162556 


000002 


016674 


000004 


162740 


162723 
162750 
162706 


162716 


162640 


162630 
162730 


162736 


162577 
162616 


000002 


. = 

12 PAGE 69 

SCOPE HANDLER ROUTINE 
BEQ 23 
CMP OSWR, STSTNM 
BEG SOVER 

23: TSTB SERFLG 
BEG 3$ 
CMPB SERMAX, SERFLG 
BHI 3$ 
BIT #81T09, dSWR 
BEQ 4§ 

73: MOV $LPERR, SLPADR 
BR SOVER 

4S: CLRB SERFLG 
CLR STIMES 
BR 1$ 

35: BIT . #B1T11, dSWR 
BNE 1$ 
TST SPASS 
BEQ 1% - 
INC SICNT 
CMP STIMES, SICNT 
BGE SOVER 

1$: MoV #1,.SI1CNT 
MOV SMXCNT. STIMES 

SSVLAD: INCB STSTNM 
MOVB STSTNM. STESTN 
MOV (SP), SLPADR 
Mov (SP), SLPERR 
CLR SESCAPE 
MOVB #1, SERMAX 

SOVER MOV STSTNM. dDISPLAY 
MoV SLPADR,. (SP) 

4S: RTI 

BRU: 1407 

BRX: 432 

SMXCNT: 


5 
.SBTTL TRAP DECODER 


3 REXAAAAAAARAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA 
;XTHIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE “TRAP” INSTRUCTION 
;*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADORESS 
;*¥OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
+*GO TO THAT ROUTINE. 


STRAP: 


>; THIS 1S USE TO HANDLE THE 


STRAP2: MOV 
MoV 


RO, - (SP) 
2(SP),RO 
- (RO) 

(RO), RO 


RO 
STRPAD(RO).RO 
RO 


(SP), -(SP) 
4C(SP),2¢SP) 


+-BR IF NO 
+30N awe TEST? 


a) 


F YES 
HAS AN ERROR OCCURRED? 
++ MAX. ar FOR THIS TEST OCCURRED? 


+7 BR 
LOOP ON ERROR? 


ra 


R_ IF NO 
++SET LOOP ADDRESS TO LAST SCOPE 


++ ZERO THE ERROR FLAG 

++CLEAR THE NUMBER OF ITERATIONS TO MAKE 
++ESCAPE TO THE NEXT TEST 

i; INHIBIT ITERATIONS? 

+7BR IF YES 

+; 1F FIRST PASS OF PROGRAM 

i INHIBIT |! TERATIONS 

+; INCREMENT ITERATION COUNT 

+;CHECK THE NUMBER OF ITERATIONS MADE 
+7BR IF MORE ITERATION REQUIRED 
+7REINITIALIZE THE ITERATION COUNTER 
++SET NUMBER OF ITERATIONS TO DO 
+;COUNT TEST NUMBERS 

+;SET TEST NUMBER iN APT MAILBOX 
+;SAVE SCOPE LOOP ADORESS 

+; SAVE ERROR LOOP ADDRESS 

+;CLEAR THE ESCAPE FROM ERROR ADDRESS 
+;ONLY ALLOW ONE(1) ERROR ON NEXT TEST 
+: DISPLAY TEST NUMBER 

+;FUDGE RETURN ADDRESS 


SWR<7: O> 


>;MAX. NUMBER OF ITERATIONS 


>> SAVE RO 

;;GET TRAP ADDRESS 
>;BACKUP BY 2 

;;GET RIGHT SYTE OF TRAP 
+;POSITION FOR INDEXING 
7; INDEX TO TABLE 

+:GO TO ROUTINE 


“GETPRI" MACRO 


+;MOVE THE PC DOWN 
+;MOVE THE PSW DOWN 


SEQ 0067 | 









































3472 
3473 
3474 
3475 
3476 
3477 
3478 
3479 
3480 
3481 
3482 
3483 
3484 
3485 
3486 
3487 
3488 


016672 


016674 
016676 
016700 
016702 
016704 


016706 
016710 
016712 
016714 
016716 
016720 
016722 
016724 


016726 
016732 
016736 
016742 
016746 
016752 
016760 
016766 
016774 
016776 
017000 


017002 
017010 
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000002 


016662 
013056 
014574 
014550 
014610 


013034 
013340 
013446 
013456 
013656 
013716 
013750 
014126 


006367 
006367 
006367 
006367 
006367 
016767 
162767 
042767 
000207 
000240 
000200 


016767 


005267 





000044 
000040 
000034 
000030 
000024 
000020 
000001 
000037 


000126 


000022 
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000020 
000012 
000004 


162702 
162672 


162662 
162660 


162644 
162642 


162632 
162622 





TRAP DECODER 
RTI 


.SBTTL TRAP TABLE 
+XTHIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 


>¥BY THE "TRAP" 
3 ROUT INE 
STRPAD: . WORD 

STYPE 
STYPOC 


STYPOS 
STYPON 


. SCOP 1 
. INSTR 


. INSTER 


. PARAM 
. SAVOS 
. RESOS 


INSTRUCTION. 


S$TRAP2 

++ CALL=TYPE 
7+ CALL=TYPOC 
>+CALL=TYPOS 
+; CALL=TYPON 


+; CALL=SCOP1 
++ CALL=INSTR 
>; CALL=INSTER 
+; CALL=PARAM 
+; CALL=SAVOS 
+; CALL=RESOS 


. CONVRT ;;CALL=CONURT 


SETFLG 


++ CALL=SETFLG 


SEQ 0068 


++RESTORE THE PSW 


TRAP +1( 104401 ) 
TRAP +2( 104402) 
TRAP +3( 104403) 
TRAP +4 (104404 ) 


TRAP +5 (104405) 
TRAP +6( 104406) 
TRAP +7( 104407) 
TRAP+10(104410) 
TRAP +11(104411) 
TRAP +12(104412) 
Seomehn tein ahs 
TRAP +14 (104414 


TTY TYPEOUT ROUTINE 

TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
TYPE OCTAL NUMBER (NO LEADING ZEROS) 
TYPE OCTAL NUMBER (AS PER LAST CALL) 


5 AERSREEEENESE EES PEER ELS EULESS EEAEES TEE EEEEE ESET EEE 
sUTILITIES 
Petettttttittettttttittttttttt testi tees tees tite sett tt ttt ttt: 
> THIS UTILITY CALCULATES abe LEVEL 
DUPRT 


DULEV: SL + SHIF 
ASL DUPRT ; 
ASL DUPRT =; 
ASL DUPRT ; 
ASL DUPRT =; 
MOV DUPRT, LESS! 
SUB #1,LESS1 
BIC #37,LESS1 
RTS PC 
DUPRT: PRS 
LESS1: PRY *LEVEL TO ALLOW 
+NEW DU ADDRESSES . 
DUADDR: MOV DUBASE. RXCSR 
INC DUBASE 
MOV DUBASE. HRXCSR 
INC DUBASE 
MoV DUBASE. RXOBUF 
MOV DUBASE. PARCSR 
INC DUBASE 
MoV DUBASE. HRXOBUF 
MoV DUBASE,. HPARCSR 
INC OUBASE 
MOV DUBASE. TXCSR 
INC DUBASE 
MOV DUBASE. HTXCSR 
DUBASE 


T LEFT 


*MOVE THIS TO LESS! 


+ CREATE LESS! 
+CLEAR TN2VC 


INTERRUPTS 


+ XXXO 
> XXX1 


; XXA2 
; XXXZ 


7; XXX3 
+ XXX 


7 XXXY4 
7 XXX5 
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DZOUSB. M11 31-MAY-77 09: 49 TRAP TABLE SEQ 0069 
3528 017112 016767 OO00016 162612 MOV DUBASE, TXDBUF + XXX6 
3529 017120 005267 000010 INC DUBASE 
3530 017124 016767 OO0004 162602 MOV DUBASE.HTXOBUF ; XXX7 
3531 017132 000207 RTS PC 
ss 017134 o00000 DUBASE: 0 
3534 +; THIS UTILITY POKES THE MAINT DATA BASED UPON THE 
3535 > INFORMATION CONTAINED IN STMP1 AND IT IS 
3536 ;SHIFTED IN BY THE CONTENTS OF SHIFT 
3537 017136 042777 O40009 162562 RPOKE: BIC #MTDATA, @TXCSR 
3538 017144 005067 162332 CLR STMP2 
3539 017150 006067 162324 ROR STMP1 ;FORCE CARRY 
3540 017154 006067 162322 ROR S$TMHP2 ;PICK UP CARRY IN BIT 15 
3541 017160 006267 162316 ASR $TMHP2 ;SHIFT INTO BIT 14 
3542 017164 042767 100000 162310 BIC #81715, STMPZ CLR BIT 15 
3543 017172 056777 162304 162526 BIS STMP2, ATXCSR +POKE MAINT DATA 
3544 017200 042777 020000 162520 BIC #CLK, ATXCSR >POKE CLK 
3545 017206 052777 020000 162512 BIS #CLK, ATXCSR ; 
3546 017214 005367 161702 DEC SHIFT 
3547 017220 001346 BNE RPOKE 
3548 017222 000207 RTS PC 
3549 > THIS ROUTINE CALCULATES ODD PAP ITY FOR AN 8 BIT CHAR 
3550 017224 016767 162250 162250 ODD8: MOV STMP1,STMP2 ; SAVE TEMP! 
3551 017232 005067 162246 CLR STMP3 
3552 017236 012727 000010 MOV #8.,(PC)+ 
3553 017242 000000 4$: 0 
3554 017244 006067 162232 1$: ROR STMPZ 
3555 017250 005567 162230 ADC STMP3 
3556 017254 005367 177762 DEC 4§ 
3557 017260 001371 BNE 1$ 
3558 017262 006067 162216 ROR STMP3 
3559 017266 103404 BCS 2$ 
3560 017270 052767 COO400 162202 BIS #B ITS, STMP1 SET ODD PARITY 
3561 017276 000403 BR 3$ 
3562 017300 042767 O00400 162172 2%: BIC #B iTS, STMP1 7CLR EVEN PARITY 
3563 ;STMP1 NOW HAS ODD PARITY CHARACTER 
nee 017306 000207 35: RTS PC 
3566 ; THIS ROUTINE CALCULATES EVEN PARITY FOR AN 8 BIT CHARACTER 
3567 017310 016767 162164 162164 EVENS: MOV STMP1,STMPZ SAVE TEMP 1 
3568 017316 005067 162162 CLR STMP3 
3569 017322 012727 000010 MOV #8... (PC)+ 
3570 017326 000000 4$: 0 
3571 017330 006067 162146 1S: ROR STNP2 
3572 017334 005567 162144 ADC STMP3 
3573 017340 005367 177762 DEC 4$ 
3574 017344 001371 BNE 1% 
3575 017346 006067 162132 ROR STNP3 
3576 017352 103004 BCC 2$ 
3577 017354 052767 OO0400 162116 BIS #B iTS, STMP1 + SET EVEN PARITY 
3578 017362 000403 BR 3$ 
3579 017364 042767 OO0400 162106 2%: BIC #B1T8, STMP1 CLR ODD PARITY 
3580 ;STMP1 NOW HAS EVEN PARITY CHARACTER 
or 017372 000207 3: RTS PC 
3583 017374 062716 000002 TRPREG: ADD #2, (SP) ;ALLOW IT TO “CRUNCH" INTO HLT BACK 
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3584 
3585 017400 00000 
2586 0000 


2 


01 
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. END 


TRAP TABLE 


RTI 


+ 1N MAIN PART OF THE PROGRAM 


SEQ 0070 


G 6 
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SEQ 0071 


— 
| 


| 


Aaa 003200 12938 
ABASE = 000000 876 917 

ACDW1 = GO0000 876 919 

ACOW2 = 000000 876 920 

ACPUOP= O00000 876 891 

ACTREG 001166 7358 1249% 1263% 1264% 1271k 2697 2700 2710 
ADDWO = 000000 876 921 

ADDW1 = cO0000 876 922 

ADOW1O= 000000 876 931 

ADDW11= 000000 876 932 

RODW12= O00000 876 933 

ADDW13= 00000 876 934 

ADDWi4= OO0000 876 935 

ADOW1S5= 000000 876 936 

ADDW2 = 000000 876 923 

ADDW3 = 000000 876 924 

ADDWY = 00000 876 925 

ADDWS = 000000 876 926 

ADDWe = 000000 876 927 

ADDW7 = 000000 876 928 

ADDWS = 000000 876 $29 

ADOW = G00000 876 930 

ADEVCT= OC0000 876 £82 

ADEVM = 000000 876 918 

ADRCNT= 013655 2912% 2951" 29588 
RENVY = 000000 276 88? 

AENVM = 000000 8/6 888 

AFATAL= 000000 876 879 

AMADRi= 000000 876 904 

AMADR2= 000000 876 908 

AMADR3= 000000 876 911 

AMADR4Y= 00000 876 914 

AMANS1= 000000 876 898 

AMANS2= 000000 876 906 

AMANS3= 000000 876 909 ‘ 
AMANS4= 000000 876 912 ; 
AMSGAD= 000000 876 884 

ANSGLG= 000000 876 885 

AMSGTY= 000000 876 878 

ANTYPi= 000000 876 899 

AMTYP2= 000000 876 907 

AMTYP3= 000000 876 910 

ANTYP4Y= OOC00O 876 913 

APASS = 000000 876 881 

APRIOR= 000000 876 

APTCSU= 000040 5368 282 

AP TENV= 1 5368 2820 3074 
APTSI1Z= 000200 5368 6116 

APTSPO= 000100 5368 2822 

ASWREG= 000000 876 889 

ATESTN= 000000 876 880 

AUNIT = 000000 876 883 

AUSWR = 000000 876 890 

AVECT1= 000000 876 915 

AVECT2= 000000 876 916 

BASEAD 001154 7308 4«1231K «6«1268k «01269 02S s12758 = 277k «= 27048) = 2716k ~=— 2720 
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BASEIV 001162 
BBB 003026 
BINWRD 014124 
BITW = 002000 
BiTO = 000001 
BiTOO = 000001 
BiTO1 = 000002 
BiTO2 = 000004 
BiTO3 = 000010 
BiTOY = 000020 
BiTOS = O00040 
BiTO6 = 000100 
B1TO7? = 000200 
BiTO8 = O00400 
BiTO9 = 001000 
BiT1 = 000002 
BiT10 = 002000 
BiTi1 = 004000 
BiT12 = 010000 
BiT13 = 020000 
BiTi4 = 040000 
BiT1S = 100000 
BiT2 = OO0004 
BIT3 = 000010 
BiT4 = 000020 
BITS = QO0040 
BiTé = 000100 
BiT7 = 000200 
BiIT8 = 000400 
BiT9 = 001000 
BPTVEC= 000014 
BREAK = 000001 
BRW 016632 
BRX 016634 
CARDET= 010000 
ccc 012612 
CHRCNT 014122 
CKSWR 012706 
CLK = 020000 
CNTLU) 012762 
CONVRT= 104413 
COUNT 001124 
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thy 
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2705% 
30258 
809 


2717% 


971 


3494S 
23608 
2571% 


2722 


1002 


2367% 
2600% 


H 6 


2723% 


2166 


975 
974 
973 


2396% 
2607% 


2724 


996 


156? 
2110 
2588 


24034 
26364 


2725% 


3062 


3069 
3394 
3542 


3560 


1619 
2147 
2624 


1418 
1671 
1758 
1873 
1959 
2076 
2191 
2319 
2420 
2529 
2634 


24324 
264 3% 


2726 


3401 


3562 


1671 
2191 
2660 


24394 
2672% 


2727% 


3577 


1710 
2235 


1469 
1678 
1788 
1876 
1993 
2079 
2198 
2322 
2427 
2561 
2666 


465% 
2679% 


2728 


3579 


1749 
2273 


2729% 


1788 
2312 


2498% 


SEQ 0072 


1826 
2348 


1521 
1710 
1797 
1914 
1997 
2117 
2235 
2355 
2456 
2594 
2670 


2505% 


a ed 
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oO 

a" 

(74) 
“www oo 


oOo 

" 

z 

) 

mm 
oun nwo 


DUADOR 
DUBASE 


DULEV 
DUPRT 
DUR IS 
DUR IV 
DUTIS 
DUT IV 
EIGHT = 


EMTVEC= 


FRMERR= 


000015 
000200 
020000 
177570 
013652 
015315 
002132 
002067 
001442 
000174 
100000 
000040 
100000 
000040 
001000 
177570 
000002 
002116 
002126 
017002 
017134 


016726 
016776 
001740 
001736 
001744 
001742 
006000 


000030 
001762 
002022 
002043 
001746 
001114 
000004 
017310 


= 001400 


000400 
000000 
020000 
SERRK% 
000010 
013650 
001130 
001132 
001134 
001136 
001140 
001142 
001144 
001120 
001724 
001714 
001720 
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2876 
2876 


1156 
29568 


1035 
1033 


1164% 
1189 


1155 
1034 
35148 
2720% 
3526 
3502% 


1240 


1466 
1141% 


1154% 
35678 
1829 


1674 
1687 
3484 


29558 
3092% 
3093% 


1039 
10748 
1189% 


1165% 
1870 
1829 


1726 
3485 


CROSS REFERENCE TABLE -- 


1085% 
3061% 


3515% 
3528 


3504% 
2722% 


1570 


3406 
1911 
1990 


1765 
3488 


| 6 


USER SYMBOLS 


3445% 


3516 
3529% 


3505% 
2729 


1622 


3407% 
1952 
2315 


1804 
3489 


3517% 


3530 
3506 


1791 


3409% 


2150 
2459 
3490 


3518 3519 
35328 


35108 


3520% 3521 


1952 2113 2150 2194 


3412% 

2238 

2591 

3491 3492 3493 3494 


3522 


2238 


3495 


SEQ 0073 | 


3523% 


2276 


J 6 
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HT = 000011 5788 2835 2876 

HTXCSR 001730 10498  3526% 

HTXDBU 001734 10518  3530% 

INBUF 016136 1296 1300 2885 2915 3033 3037 33648 

INIFLG 001172 7438 861199 1202% 

INSTER= 104407 1304 2934 3042 34908 

INSTR = 104406 1221 1232 1242 1253 1278 1294 1307 1311 1315 1219 1336 2775 34898 
INSTRZ 013454 2882 2894 29038 

1\OTVEC= 000020 6738 1138% 1139% 

isyAo0D= 000000 7908 983% 1667 1674 1706 1713 1745 1752 1784 1791 1822 1829 1863 


1870 1904 1911 1945 1952 1983 1990 2024 2031 2065 2072 2106 2113 
2143 2150 2187 2194 2308 2315 2344 2351 2380 2387 2416 2423 
JMRBY 001153 7268 «=81207% 1322 


KEEPAD 001156 7318 8 1229% 1231 1275 1277 2716 
KEEPIV 001164 7348 8 81240% 2717 

LASTAD 001160 7328 =§=©1258 1269 1283 

LESSi 017000 3506% 3507% 3508* 35118 

LF = 000012 5798 2870 2876 

LIGHTS 001102 693% 2741% 

LIMITS 013602 2925 29398 

LOBITS 013654 2911x 2943 29578 2958 

LOCK 001110 701% 2795 

LOKFLG 001174 7458 

LOLIN 013646 2908% 2941 29548 

MCNTG 016103 2770 3354R 

MCOW 015327 2€99 32878 

MCRLF 015427 2987 33008 

MDATA 016242 3007 3018 33688 

MEPASS 015476 2692 33078 

MEXT = 010000 8138 10068 

MEXTJ 016043 1320 33488 

MINT = 004000 812% 10058 1359 1411 1463 1515 156? 1619 1671 1710 1749 1788 1826 


1867 1908 1949 1987 2028 2069 2110 2147 2191 2235 2273 2312 2348 
2384 2420 2456 2489 2522 2555 2588 2624 2660 


MLASTD 015263 1254 32808 
MLOCK 015542 33148 

MMNEW 016124 2775 33588 
MMSWR 016113 2772 33568 
MMULT 015234 1243 32768 
MPFAIL 015432 3258 33018 
Man 015423 2901 32998 
MR 015523 1341 33118 
MRANGE 015357 1279 32928 
MREGAD 015204 1222 32728 
MRESET= 000400 803% 9968 1354 1356 1406 1408 1458 1460 1510 1512 1562 1564 1614 


1616 1666 1668 1705 1707 1744 1746 1783 1785 1821 1823 1862 1864 
1903 1905 1944 1946 1982 1984 2023 2025 2064 2066 2105 2107 2142 
2144 2186 2188 2230 2232 2268 2270 2307 2309 2343 2345 2379 2381 
2415 2417 2451 2453 2484 2486 2517 2519 2550 2552 2583 2585 2619 


MSYNC 015575 1295 33198 
MTDATA= 040000 8008 9938 1359 1411 1463 1515 1567 1619 1671 1716 1749 1788 1826 

1867 1908 1949 1987 2028 2069 2119 2147 2191 2235 2273 2312 2348 

2384 2420 2456 2489 2522 2555 2588 2624 2660 3537 


MTITLE 015136 1201 32658 
MTSTPC 015527 1331 33128 


K 6 
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MULTO 001152 725% = §=1245 1246 2695 

MVECTO 015171 1233 32708 

MHIREY 015764 1316 33408 

MWIRES 015714 1312 33334 

MWIREG 015643 1308 33268 

NEXT 001106 7008 

NOPAR = 000000 795% 9888 1362 1414 1466 1518 1570 
2351 2387 2423 2459 2492 2525 2558 

ODDPAR= 001000 796% 9898 1990 2031 2072 2113 -¢ 2194 

oDD8 017224 2207 2286 35508 

ONCE 002610 1200 12038 

OPTCLR 001151 7248 =§=61318 

OUT 013014 2761 2763 2765 2769 27818 

OUTCRY 012604 2693 27328 

OUTMUL 003166 1251 1276 12878 

OVRRUN= 040000 7818 9748 

PARAN = 104410 1223 1234 1255 1280 1332 2776 34918 

PARAMI 013506 29148 2935 

PARCSR 001722 10468 1355% 1362k 1407% 1414% 1459% 1466% 


1667% 1674% 1706% 1713% 1745% 1752k 8 1784% 
1911m 1945e 1952k 1983% 1990% 2024% 2031% 
2187x% 2194% 2231% 2238% 2269% 2276k 2308% 
2423% 2452k 2459k 2485k 2492k 2518% 2525% 


PAREN = 001000 7858 9788 

PARER = 010000 7838 976% 1838 1879 1920 1961 1999 
PARERR 013562 2917 2919 2921 29208 2940 2942 2944 
PART! 013644 2933 29538 

PASCNT 001112 7028 8 1176% 2740% 2741 2742 
PFTAB 015130 3256 32628 

PIRQ = 177772 5858 

PIRQVE= 000240 679% 

POPRO = 012600 7588 9518 

POP1SP= 005726 756% 949% 

POP2SP= 022626 7608 9538 

PRO = 000000 602% 

PR1i = 000040 6038 

PR2 = 000100 604% 

PR3 = 000140 605% 

PRY = 000200 606% 3511 

PRS = 000240 6078 3510 

PR6 = 000300 608% 

PR7 == 000340 609% 

PS = 177776 5828 583 

PSH = 177776 5838 

PUSHRO= 010046 7578 9508 

PUSH1S= 005746 7558 948h 

PUSH2S= 024646 759% 9528 

PWRVEC= 000024 6748 1144R 8 1145% 

ROSW 013022 2771% 2781% 27838 2932 
RECACT= 004000 7678 9608 

REPLAY 012510 2712 = 2718 27208 

RESTAR 015034 3236 32428 

RESTRT 012670 2713 2744 27518 
RESVEC= 000010 6698 


RESOS = 104412 34938 


1511% 
1791% 
2065% 
2315% 
2551% 


2040 


1674 
2627 


1518% 
1822% 
2072% 
2344% 
2558% 


2081 


1713 
2663 


1563% 
1829% 
2106% 
2351% 
2584% 


2122 


1752 


1570% 
1863% 
2113% 
23804 
2591% 


1791 


1615% 
1870% 
2143% 
2387% 
2620% 


SEQ 0075 


2315 


1622% 
1904% 
2150% 
2416% 
2627% 


L 6 
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RETURN 001104 6998 1181% 1338% 1340% 1342 3261 

RING = 040000 7648 957 

RINTEN= 000100 7728 9658 

ROTADD 001170 738% 1250% 1262% 1264 1266% 1271 1274x 2707% 2710 2714% 

RPOKE 017136 1371 1383 1387 1423 1435 1439 1475 1487 1491 1527 1539 1543 1579 
1591 1595 1631 1643 1647 1685 1724 1763 1802 1841 1882 1923 1964 
2002 2043 2084 2125 2168 2212 250 2288 2327 2263 2399 2435 2468 
2501 2534 2567 2603 2639 2675 35378 3547 

RTS = 000004 776% 9698 

RUNA = XEKKKK U 1 51 140 513 

RUNB = XXXXKK U 1 51 140 513 

RUNC = 000000 1 51 140 513 

RUND = 4&xKKK U 21 56 143 518 

RUNE = XKKKKK U 21 56 143 518 

RUNF = ¥XKEKK U 21 56 143 518 

RUNIT 012414 2698 27048 2711 

RXCSR 001712 10428 1363% 1372 1415*% 1424 1467% 1476 1519x 1528 1571x 1580 1623% 1632 
1675% 1714% 1753% 1792k% 1830k 1842 1871x% 1883 1912% 1924 1953x% 1965 1991% 
2003 2032% 2044 2073% 2085 2114% 2126 2151x% 2195% 2239% 2277% 2316% 2323% 
2328 2352% 2359% 2364 2388%  2395% 2400 2424k 2431% 2436 2460% 2464% 2469 
2493x 2497% 2502 2526% 2530% 2535 2559x 2563% 2568 2592k 2599% 2604 2628% 
2635% 2640 2664% 2671% 2676 2734 3514% 

RXDBUF 001716 1044# 1267 1375 1390 1419 1427 1442 1471 1479 1494 1523 1531 1546 
1575 1583 1598 1627 1635 1650 1686 1688 1725 1727 1764 1766 1803 
1805 1837 1845 1878 1886 1919 1927 1960 1968 1998 2006 2039 2047 
2C80 2088 2121 2129 2158 2169 2202 2213 2243 2251 2281 2289 3518% 

RXDONE= 000200 7718 964% 

RXERR = 100000 7808 973% 1687 1726 1765 1804 1838 1879 1920 1961 1999 2040 2081 
2122 

SAVIT 014356 3071 30928 

sSAVPC) §=©001126 7118 2962% 

SAVSP 001116 7048 3235% 3242 

SAVOS = 104411 34928 

SCOP1 = 104405 34888 

SEND = 000020 8078 10008 

SEREC 001150 7238 861314 

SETFLG= 104414 1244 1309 1313 1317 1321 34958 

SEVEN = 004000 7938 9868 1362 1414 1752 1911 2072 2387 2525 2663 

SEXMIT 001147 7228 = =61310 

SHIFT 001122 709% 1369% 1381% 1385% 1421k 1433K 1437K 1473k 1485% 1489K 1525% 1537% 1541% 
1577x 1589% 1593% 1629% 1641% 1645% 1682k 1721% 1760% 1799k% 1839% 1880% 1921% 
1962 2000% 2041% 2082% 2123% 2161% 2205% 2246% 2284% 2326% 2362k 2398% 24344 
2467% 2500k 2533% 2566% 2602% 2638% 2674% 3546% 

Six = 002000 7928 9858 1713 1870 2031 2351 2492 2627 

SPACNT= 014123 2992% 3011 3O14* 30248 

SRO = 002000 7688 9618 

STACK = 001100 5738 1136 1172 1326 3251 

STO = 000010 7758 968% 

STFLG 001173 7448 = =—1178% 

STKLMT= 177774 5848 

STPSYN= 000400 770% 9638 2323 2359 2395 2431 2464 2497 2530 2563 2599 2635 

svos 013664 29668 

SHR 001440 8428 1134 1155% 1157 1163% 1170% 1186 1188% 1193 1209 1328 2762 
3062 3069 3081 3084 3394 3401 3415 3417 3423 3430 

SWREG 000176 685# 1163 1188 1193 2762 2779 2786 

SWREGL 013024 2774 27848 
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SWO = 000001 637% 

SWOO = 000001 627% 637 1209 

SWO1 = 000002 626% 636 1328 

SWO2 = 000004 625% 635 

SWO3 = 000010 624% 634 

SWO4 = 000020 623% 633 

SWOS = 000040 6228 632 

SWO6 = 000100 6218 631 

SWO7 = 000200 6208 630 

SWO8 = 000400 6198 629 

SWO9 = 001000 6188 628 2793 

SWi_ = =: 000002 6368 

SWi0 = 002000 6178 

SW1i1 = 004000 6168 

SWi2 = 010000 615% 

SWi3 = 020000 6148 

SWi4 = 040000 6138 

SWiS = 100000 6128 

SW2. = 000004 6358 

SW3 = 000010 6348 

SWH = 000020 633% 

SWS == 000040 632% 

SW6 == 000100 6318 

SW? = 000200 6308 

SW8 = = 000400 629% 

SW9 = 001000 € 288 

SYNCNO 001146 7218 =1298k 1302% 

SYNEXT= 020000 7898 9828 1355 1362 1407 1414 1459 1466 1511 1518 1563 1570 
1622 2231 2238 2269 2276 2452 2459 2485 2492 2518 2525 2551 

SYNINT= 030000 7888 9818 2584 2591 2620 2627 2656 2663 

SYNSCH= 000020 7748 9678 1363 1415 1467 1519 1571 1623 1675 1714 1753 1792 
1871 1912 1952 1991 2032 2073 2114 2151 2195 2239 2277 2316 
2388 2424 2460 2493 2526 2559 2592 2628 . 2664 

SYSTST= 014000 8148 10078 

TBITVE= 000014 6708 

TEMP 016200 2997 3252% 3253% 33668 

TKVEC = 000060 677% 

TPVEC = 000064 678% 

TRAPVE= OO0034 6768 8 1142% 8 61143% 

TRPREG 017374 35838 

TRTVEC= 000014 6718 

TST1 003374 1333 1340 13538 2752 3391 

TST10 005230 17048 

TST11 005370 17438 

TST12 005530 17828 

TST13 005670 18208 

TST14 006040 18618 

TST15 006210 19028 

TST16 006360 19438 

TST17 006530 19818 

TST2 003606 14058 

TST20 006700 20228 

TST21 007050 20638 

TST22 007220 21048 

TST23 007370 21418 


TST24 007554 21858 
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TST25 007740 22298 
TST26 010074 22678 
TST27 =©010230 23068 
TST3 004020 14578 
TST30 010400 23428 
TST31 010550 23788 
TST32 010720 24148 
TST33 011070 24508 
TST34 = =011224 24838 
TST35 011360 25168 
TST36 04=—-011514 25498 
TST3? =—.011650 25828 
TST4 004232 15098 
TST4O 012020 26188 
TST41 §=012170 26548 
TSTS 004444 15618 
TST6 004656 16138 
TST? 005070 16658 
TTST 016322 33948 
TXCSR 001726 10488 1354% 1356% 1359k 1365% 1366% 1406k 1408K 1411% 1417% 1418% 1458% 1460% 


463K 1469% 1470K 1510% 1512k 1515% 1521% 1522k 1562k 1564% 1567% 1573 1574% 
1614% 1616% 1619% 1625% 1626% 1666% 1668% 1671% 1677% 1678% 1680% 1681% 1705% 
1707% = =61710% 4 =61716k% =61717K =691719% §=691720k «=61744%) «=«1746Kk = «=1749K = 1 755k) = 1756k = 1788x =: 175 9% 
1783% 1785% 1788% 1794k 1795k 1797k 1798% 1821% 1823% 1826% 1832% 1833% 1835% 
1836% 1862% 1864% 1867% 1873% 1874% 1876% 1877% 1903% 1905% 1908% 1914" 1915% 
1917k =6-:1918k =61944k =«1946k «6«1949K =61955k «61956k =61958k «=691959k 1982k 1984% 1987% 1993% 
1994% 1996% 1997% 2023% 2025% 2028% 2034% 2035% 2037% 2038% 2064% 2066%  2069% 
2075* 2076% 2078% 2079% 2105% 2107% 2110% 2116% 2117% 2119% 2120% 21428 2144 
2147k 8 =62153% 2154k 2156% 2157k 2186k 2188% 2191% 2197% 2198% 2200% 2201% 2230% 
2232k 2235% 2241% 2242k 2268% © 2270% 2273k 2279% 2280% 2307% =2309% 2312k 2318% 
2319% 2321% 2322% 2343k 2345k 2348% 2354k 2355% 2357k 2358% 2379k 2381% 2384% 
2390% 2391% 2393% 2394% 2415*% 2417k 2420k 2426% 2427k 2429% 2430K 2451% 2453% 
2456% 2462k 2463% 2484xX 2486k 2489% 2495k 2496k 2517k 2519% 2522% 2528%  2529% 
2550% 2552k 2555% 2561% 2562% 2583% 2585% 2588% 2594* 2595% 2597k 2598%  2619% 
2621% 2624% 2630% 2631% 2633K 2634% 2655% 2657x 26604 2666%  2667%  2669% 2670% 
3524k $537k 3S43ek BS44ek 354% 


TXDBUF 001732 10508 3528% 

TXDONE= 000200 8048 9978 

TXINTE= 000100 805% 998% 

TYPE = 104401 1201 1341 2691 2694 2699 2770 2772 2840 2883 2900 2986 3017 3064 
3072 3108 3125 3127 3130 3132 3136 3143 3207 3257 34828 

TYPOC = 104402 3116 3140 34838 

TYPON = 104404 34858 

TYPOS = 104403 34848 

USER = 000000 8118 10048 

void = 000001 7788 9718 

WROCNT 014120 2990%  3019% 30228 

ZERO 012422 27058 

SAPTHD 002136 1107 11178 

SASTAT= 822582 U 536 

SATYC O000Z4R 5368 

SATY1 OOOOOOR 5368 

SATY3 OO0006R 5368 2825 

SATY4Y 000016R 5368 3077 

SAUTOB 001434 8398 


SBASE 001602 9178 










SBDADR 


1-MAY-77 09: 

001422 S348 
001426 836% 
001516 868% 
001606 919 
001610 920 
013334 284 2% 
AXZKKX U 3488 
001400 8228 
000006 8548 
000014 8548 
000006 8528 
000006 8608 
001554 8918 
001523 8708 
001612 9218 
001614 922% 
001636 9318 
001640 932% 
001642 933% 
001644 9348 
001646 935% 
001650 9368 
001616 9238 
001620 9248 
001622 9258 
001624 268 
601626 9278 
001630 9288 
061632 929% 
001634 930% 
001536 8828 
001604 9188 
000002 5348 
012660 1094 
001546 536 
001547 536 
001403 8258 
001415 8318 
014174 1140 
001416 8328 
001652 1022% 
014414 31078 
001412 829% 
001514 8678 
001546 8868 
001652 9398 
001530 536% 
GOO244R 5368% 
001456 8508 
001455 8498 
001420 8338 
001424 8358 
S2a5%% U 3487 
002136 11148 
001404 8268 


001435 
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27478 
887% 
888% 

1177% 

1148% 

3058% 

1080 

3122 


1178% 
1147% 


1119 
879% 


2845 
2876 


34 34% 
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3092 


2859 

1132 
856% 
856% 
862% 


2876 


1203 
1168 
2739% 
3421 
1083 


3065% 
3087 


2876 


3435 


2868% 

1140 
8578 
857% 
8634 


3072 


2820 
2822 
3059% 
3444 


1179% 


3092 
3089 


34 37% 


8 ? 


28738 
1146 1147 
8584 859% 8608 
8584 859% 8608 
864% 865% 8668 


3092 3108 3127 3132 3136 


2881 3074 

2827 

3092 3259k 3375 3419 3421 3427x 3451 
451 


2738k  3066% 3067k 3068 3092 3114 3260% 


3092 344 3% 


3450 


3390% 






















































19428 19808 2021 2062 21038 21408 21848  2228% 22668 23058 23418 23778 24138 
24498 24828 25158 25488 25818 26178 26528 


ae 
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SITEMB 001414 830%  3068% 3076 3092 311i 
SLF 001524 871% 2876 3092 
SLFLG QO00243R Sleek 
SLPADR 001406 8278 1149% 2752k 3396% 3425e% BH4ik 3446 3450 
SLPERR 001410 828%  1150% 23086 3425 3442% 3450 
SMADRi 001560 904% 
SMADR2Z 001564 908% 
SMADR3 001570 9118 
SMADRY 001574 9148 
SMAIL 001526 8778 1115 1119 1167 2820 3074 3440 
SMANS1 001556 B98 
SMAMNSZ2 001562 9068 
SMANS3 001566 909% { 
SMAMNSY 001572 9128 
SMBADR 002140 11158 
SMFLG 000242R 536Rx 
SMSGAD 001542 536% 8848 
SMSGLG 001544 536% 8858 
SMSGTY 001526 536% 878% 
SMTYP1 001557 899% 
SMTYPZ2 001563 907% 
SMTYP3 0061567 9108 
SMTYP4Y 001573 9138 
SMXCNT 016636 3438 34508 

= 000000 5348 26838 
SNULL 001454 248% 2847 2876 
YNWTST= 000000 13528 14048 14568 15C08# 15608 16128 1664 17038 17428 17818 18198 18608 1901% 
SOCNT 014772 3179% 3208k% 32218 
SOMODE 014774 3174% 8 863178k =. 3183 3186x% 3197k 32238 
SOVER 016616 3399 3462 3418 3426 3436 34458 
SPASS 001534 8818 11678 2742k 3432 3451 
SPASTMN 002144 11178 
SPWRON 014776 1144 32278 
SQUES 001522 869% 2876 3092 
SROCHR= £224xK U 3488 
SRODEC= 82a2%% U 3488 
SROLIN= 342%% U 3488 
SROOCT= KkRaaK U 3488 
SREGAD 001460 8528 
SREGO 001462 8548 2971% 2976 
SREG1 001464 8558 2970% 2977 
SREG2 001466 8568 2969% 2978 
SREG3 001470 8578 2968% 2979 
SREGY 001472 8588 2967k 2980 
SREGS 0601474 859% 2966% 2981 
SR2A = ERERRX U 3488 
SSAVRE= 822442 U 3488 
SSCOPE 016304 1138 33848 
SSETUP= 000017 11208 1137 1138 1140 1142 1144 1146 1147 1149 3059 3084 3091 3385 
SSTUP = 177777 11208 
SSVLAD 016562 3410 34398 
S$svPC = 002136 10928 1097 
$SWR = 177400 5258 866 867 868 1146 1147 1149 1150 1354 1406 1458 1510 1562 


1614 1666 1705 1744 1783 1821 1862 1903 1944 1982 2023 2064 2105 
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SSWREG 


STYPBN= 
STYPOS= 


S4OCAT= 


001550 
000000 
001532 
001512 
001446 
001444 
001476 
001500 


001502 
001504 
001506 
001510 
000042 


001452 
001457 
001450 
016640 
016662 
000015 


016674 
002142 
001402 


$8 8 3 8 | 
RaR5%% 
013056 
013270 
013336 
014574 


017402 
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2186 
2655 
3378 
3442 


1335 


3474 
2858 
28748 


3485 


3187 


6838 
1104% 
1481 


1338 


3482 
28638 


32228 


686% 
11068 
1496 


34868 


2737% 


2864 


691% 
11084 
1529 


CROSS REFERENCE TABLE -- USER SYMBOLS 


0 7? 
2343 2379 
3053 3054 
3413 3415 
3450 
1434e = 14 38% 
1646% 1683% 
2162% 2165% 
2499% 2532x 
3543 3550% 
3572% 3575% 
1456 14588 
17448 1781 
2021 20238 
22688 2305 
2515 25178 
3488 34898 
3061 3092 
746% 7478 
1135 1149 
1533 1548 


2415 
3062 
3416 


34908 


3698 


8218 
1150 
1581 


2451 
3069 
3419 


34918 


3375 


872 
1373 
1585 


34928 


3396 


10788 
1377 
1600 


34938 


3417 


1092 
1392 
1633 


1538% 
1881% 
2247% 
3539% 


1612 
18628 
2140 
23798 
2617 


34948 


34 39% 


10938 
1425 
1637 


SEQ aa 


34958 


3440 


10958 
1429 
1652 
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DZDUSB. M11 


BEGIN 003310 
.CONVR 013750 
. EOP 012340 
INSTE 013446 
INSTR 013340 
.INST1 013360 
_ MSG 013362 
.PARAM 013456 
.PFAIL 014776 
.RESOS 013716 
.SAVOS 013656 
. SCOPE 016304 
_SCOP1 013034 
-SETFL 014126 
. START 002152 
.SASTA= KxxKKE 
.$X = 002136 
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13268 


2879% 


2703 


- . 


1847 
2127 
2569 
3451 


DZDUS-B MACY11 30(104%6) 


DZDUSB. M11 
COMMEN 680% 
ENDCOM 680% 
ERROR 574% 
1601 
1971 
2402 
ESCAPE 680% 
GE TPR | 680% 
GE TSHR 680% 
MULT 6808 
NEWTST 680% 
1980 - 
2548 
POP 536 
PRGEND 5588 
PRGFRT 5378 
PUSH 536 
PUSSYF 555% 
REPORT 525% 
RSE TUP 54 2% 
1982 
2550 
sc 5348 
SCOPE 575% 
1981 
2549 
Sci 5348 
SETPRI 6808 
SETTRA 5258 
SETUP 6808 
SKIP 680% 
SLASH 680% 
SPACE 6808 
STARS 536 
1664 
2266 
3149 
SWRSU 6808 
TRMTRP =. 34748 
TSE TUP 5438 
TYPBIN 680% 
TYPDEC 680% 
TYPNAM 6808 
TYPNUM 680% 
TYPOCS 680% 
TYPOCT 680% 
TYPTXT 680% 
SBEGIN 5348 
$B INAR 5548 
SBUFFE 536% 
SCABLE 5568 
SCATCH 5288 
K 5358 
SCLRVE 5348 
SCONUR 5368 
SONA 5528 


1374 
1634 
2005 
2438 


3114 
1323 
3361 
2765 


1203 
2983 
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1406 
2064 
2619 


1405 
2063 
2€18 


3483 


817 


1742 


2341 
3453 


3138 


1458 
2105 
2655 


1457 
2104 
2654 


3484 


872 


1781 
2377 
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1562 
2186 


1561 
2185 


3488 


1090 
1860 
2449 


1614 
2230 


1613 
2229 


3489 


1100 
1901 
2482 


; # 


1666 
2268 


1665 
2267 


3490 


1102 
1942 
2515 


1705 
2307 


1704 
2306 


3491 


1109 
1980 
2548 


1742 
2341 


1744 
2343 


1743 
2342 


3492 


1781 


2377 


1783 
2379 


1782 
2378 


3493 


1404 
2062 
2617 


1821 
2415 


1820 
2414 


3494 


1456 
2103 
2653 


1860 
2449 


1862 
2451 


1861 
2450 


3495 


1582 
1930 
2330 


1901 
2482 


1903 
2484 


1902 
2483 


1560 
2184 
3046 


SEQ 0083 


1942 
2515 


1944 
2517 


1943 
2516 


1612 
2228 
3102 


— SS Ce - 
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SPOKER 5468 1364 1416 1468 1520 1572 1624 1679 1718 
1995 2036 2077 2118 2155 2199 2240 22? 2320 
2560 2596 2632 2668 


SRESET S388 1354 1356 1406 1408 1458 1460 1510 1512 
1705 1707 1744 1746 1783 1785 1821 1823 1862 
1984 2023 2025 2064 2066 2105 2107 2142 2144 
2307 2309 2243 2345 2379 2381 2415 2417 2451 
2552 2583 2535 2619 2621 26&5 2657 


SSTRIP 551% 2298 2334 2370 2406 2442 2475 2508 2541 
SSYNCR 5478 1675 1714 1753 1792 1830 1871 1912 1953 


STSTNO 5348 1352 1404 1456 1508 1560 1612 1664 1703 
1980 2021 2062 2103 2140 2184 2228 2266 2305 


SVARIA 532% 699 


SWOROP 5498 1812 1853 1894 1935 1973 2014 2055 2096 


SSNEWT 680% 1352 1404 1456 1508 1560 1612 1664 1703 
1980 2021 2062 2103 2140 2184 2228 2266 2305 


S$SSET 34748 3483 3484 3485 3488 3489 3490 3491 3492 


. EQUAT 525% 570 


2574 


1991 


1742 
2241 


1742 
2341 


3493 


1796 
2392 


1564 
1903 
2188 
2484 


2610 


2032 


1781 
2377 


1781 
2377 


3494 


7646 


2073 


1819 
2413 


1819 
2413 


3495 


1875 
2461 


1616 
1944 
2232 
2517 


2114 


1860 
2449 


1860 
2449 


2151 


1901 
2482 


1901 
2482 


2195 


1942 
2515 


1942 
2515 


said 


—_——-— ee OO eae oer oe ee eee 





























_ HEADE 
. SETUP 
. SACTI 
. SAP TB 
. SAPTH 
. SAPTY 
. SCATC 
. SCNTA 
. SEOP 
. SERRO 
_SERRT 
. SPOWE 
SSCOP 
. STRAP 
_ STYPE 
_ STYPO 


ABS. 


DZDUS-B MACY11 30(10%6) 
bZ0USB. M11 


525% 


017402 


ERRORS DETECTED: 


DZDUSB. DZDUSB/SOL /CRF =0Z20US1/EQ: RUNC. O2DUS2, OZDUSB 
RUN-TIME: 22 12 1 SECONDS 
RUN-TIME RATIO: 319/36=8.€ 
CORE USED: 


30K 
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